diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-01 02:58:53 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-01 02:58:53 +0000 |
commit | 5fb7366ef2085d0e4f43361f99c3404a8ae1fe9c (patch) | |
tree | dee5e4bd520128bebc4232e3478bd7c053b132b4 /regcomp.c | |
parent | fa301091a913890fbb1fa04962693e6daf2a2229 (diff) | |
download | perl-5fb7366ef2085d0e4f43361f99c3404a8ae1fe9c.tar.gz |
Fix for 20001130.008 and 20001130.010, the PL_regnpar wasn't
stored and restored, and thusly was trounced by the utf8 swash
routines.
p4raw-id: //depot/perl@7937
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -4610,6 +4610,7 @@ Perl_save_re_context(pTHX) SAVEI32(PL_reg_oldpos); /* from regexec.c */ SAVEVPTR(PL_reg_oldcurpm); /* from regexec.c */ SAVEVPTR(PL_reg_curpm); /* from regexec.c */ + SAVEI32(PL_regnpar); /* () count. */ #ifdef DEBUGGING SAVEPPTR(PL_reg_starttry); /* from regexec.c */ #endif |