Change 11800 by sky@sky-borderline on 2001/08/31 17:30:26

        Fixes bug in change 11717 that bus errored on HP-UX 10.20
        Might break on platforms where bool is larger than 8 bites ???

Affected files ...

... //depot/perl/regcomp.c#231 edit

Differences ...

==== //depot/perl/regcomp.c#231 (text) ====
Index: perl/regcomp.c
--- perl/regcomp.c.~1~  Fri Aug 31 11:45:05 2001
+++ perl/regcomp.c      Fri Aug 31 11:45:05 2001
@@ -4735,7 +4735,7 @@
     SAVEVPTR(PL_reg_re);               /* from regexec.c */
     SAVEPPTR(PL_reg_ganch);            /* from regexec.c */
     SAVESPTR(PL_reg_sv);               /* from regexec.c */
-    SAVEI32(PL_reg_sv_utf8);           /* from regexec.c */
+    SAVEI8(PL_reg_sv_utf8);            /* from regexec.c */
     SAVEVPTR(PL_reg_magic);            /* from regexec.c */
     SAVEI32(PL_reg_oldpos);                    /* from regexec.c */
     SAVEVPTR(PL_reg_oldcurpm);         /* from regexec.c */
End of Patch.

Reply via email to