This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Stop hang in regex
authorKarl Williamson <public@khwilliamson.com>
Sat, 19 Mar 2011 20:50:46 +0000 (14:50 -0600)
committerKarl Williamson <public@khwilliamson.com>
Sat, 19 Mar 2011 21:14:54 +0000 (15:14 -0600)
commit6438af90e1f793b4872222495896a0ce09ccb849
tree4891799fde2a2897fe471e7d02a02bf3973f7c2e
parent75da9d4c616bae3e6791af93d2ced52dc8080f06
Stop hang in regex

The algorithm for mapping multi-char fold matches back to the source in
processing ANYOF nodes was defective.  This caused the regex engine to
hang on certain character combinations.  I've also added an assert to
stop instead of loop.
regexec.c
t/re/pat_advanced.t