This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
PATCH: [perl #133921] Segfaults in regcomp.c
authorKarl Williamson <khw@cpan.org>
Thu, 14 Mar 2019 03:25:05 +0000 (21:25 -0600)
committerKarl Williamson <khw@cpan.org>
Thu, 14 Mar 2019 03:31:58 +0000 (21:31 -0600)
commitbfa9f5ee70ce509f0e66dcff9e9fda131ea8a133
tree7f1c38bd49f14527c5c8dc7a5fc4567afe9110dc
parenta9cea67c10bc154f974a3207d7ce3f81611266bc
PATCH: [perl #133921] Segfaults in regcomp.c

If a regular expression pattern gets too long so that the branch
instructions need more bits than are available, it is supposed to
reparse and use long jumps instead of the normal ones that don't take up
extra room.  The blamed commit caused the test for this to be done too
late.  This just moves the test to do it in time; lexically later in the
file, but just after the variable takes on the too-large value and
before it gets used in the next loop iteration.
regcomp.c
t/re/pat.t