diff options
| author | Hugo van der Sanden <hv@crypt.org> | 2002-11-03 16:41:24 +0000 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-11-07 11:33:38 +0000 |
| commit | e9f19e3c03f1d62dc32ee20c3f9cd088c9618f14 (patch) | |
| tree | 074318b65e31ea0e26364ff00d9c2dcd871934a9 /ext | |
| parent | 3d40713cb3f43f5a6bd87317708c170c5a6a2304 (diff) | |
| download | perl-e9f19e3c03f1d62dc32ee20c3f9cd088c9618f14.tar.gz | |
Re: [perl #17605] strange behaviour (difference between perl 5.6 and perl 5.8.0) in the regexp
Message-Id: <200211031641.gA3GfOm08609@crypt.compulink.co.uk>
p4raw-id: //depot/perl@18118
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/B/B/Concise.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/B/Concise.pm b/ext/B/B/Concise.pm index 11660883c1..7cd198e55d 100644 --- a/ext/B/B/Concise.pm +++ b/ext/B/B/Concise.pm @@ -532,7 +532,7 @@ sub tree { # Why these are different for MacOS? Does it matter? my $cop_seq_mnum = $^O eq 'MacOS' ? 12 : 11; -my $seq_mnum = $^O eq 'MacOS' ? 100 : 84; +my $seq_mnum = $^O eq 'MacOS' ? 102 : 86; $cop_seq_base = svref_2object(eval 'sub{0;}')->START->cop_seq + $cop_seq_mnum; $seq_base = svref_2object(eval 'sub{}')->START->seq + $seq_mnum; |