X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perly_c.diff;h=0b73880c4e4270448b8fc76eeff1c3272eff5bcd;hb=07eb8ee282b50089a8093dabf88ba738c33af5ad;hp=7ade2f3b013b94dc21db1eb7da20baed23cc8974;hpb=09bef84370e90d727656ea11ba5ee8be80e361d3;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perly_c.diff b/perly_c.diff
index 7ade2f3..0b73880 100644
--- a/perly_c.diff
+++ b/perly_c.diff
@@ -28,7 +28,7 @@
   
 +     struct ysv *ysave;
 +     New(73, ysave, 1, struct ysv);
-+     SAVEDESTRUCTOR(yydestruct, ysave);
++     SAVEDESTRUCTOR_X(yydestruct, ysave);
 +     ysave->oldyydebug	= yydebug;
 +     ysave->oldyynerrs	= yynerrs;
 +     ysave->oldyyerrflag	= yyerrflag;
@@ -134,7 +134,7 @@
   yyaccept:
 !     return (0);
   }
---- 2524,2570 ----
+--- 2524,2569 ----
   #endif
       if (yyssp >= yyss + yystacksize - 1)
       {
@@ -164,7 +164,6 @@
 ! }
 ! 
 ! #ifdef PERL_OBJECT
-! #define NO_XSLOCKS
 ! #include "XSUB.h"
 ! #endif
 !