This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 9bd8781) | patch
fix $^R scoping bug.
authorDave Mitchell <davem@fdisolutions.com>
Sun, 1 Apr 2007 00:27:02 +0000 (00:27 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Sun, 1 Apr 2007 00:27:02 +0000 (00:27 +0000)
commit19b95bf092bc6fdb9455fe107fc46111b0a1ec31
treec0a2f69a85c98404ef64097caac0800dfe686308tree | snapshot
parent9bd878171021311bd025e403714388c68ff5d9e2commit | diff
fix $^R scoping bug.
By setting the outer saved $^R to the current $^R just at the
end of a successful match, and ensuring that that the savestack
doesn't get popped beforehand, the code is simplified and fixes a
bug.

p4raw-id: //depot/perl@30818
regexec.c diff | blob | blame | history
t/op/pat.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.