diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-09-29 19:39:16 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-09-29 17:54:12 +0000 |
| commit | a5ca303d52a1ef183f2014497a2d96212f0b1dd4 (patch) | |
| tree | fa2fd8044b56f529717692d0b026c9bc8dc71cc2 /ext | |
| parent | 42bc49da149640802c6d82e088ba670810f22d2a (diff) | |
| download | perl-a5ca303d52a1ef183f2014497a2d96212f0b1dd4.tar.gz | |
Minor re 'Debug' tweaks, also fix a bug in dumping certain patterns.
Message-ID: <9b18b3110609290839i58fa703u59259e4ec1d9f2d9@mail.gmail.com>
p4raw-id: //depot/perl@28904
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/re/re.pm | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/ext/re/re.pm b/ext/re/re.pm index 9fab039c04..87a450dc00 100644 --- a/ext/re/re.pm +++ b/ext/re/re.pm @@ -1,6 +1,6 @@ package re; -our $VERSION = 0.06_01; +our $VERSION = 0.06_02; =head1 NAME @@ -225,25 +225,26 @@ my %flags = ( COMPILE => 0x0000FF, PARSE => 0x000001, OPTIMISE => 0x000002, - TRIE_COMPILE => 0x000004, + TRIEC => 0x000004, DUMP => 0x000008, - OFFSETS => 0x000010, EXECUTE => 0x00FF00, INTUIT => 0x000100, MATCH => 0x000200, - TRIE_EXECUTE => 0x000400, + TRIEE => 0x000400, EXTRA => 0xFF0000, - TRIE_MORE => 0x010000, - OFFSETS_DEBUG => 0x020000, - STATE => 0x040000, + TRIEM => 0x010000, + OFFSETS => 0x020000, + OFFSETSDBG => 0x040000, + STATE => 0x080000, + OPTIMISEM => 0x100000, ); $flags{ALL} = -1; $flags{All} = $flags{all} = $flags{DUMP} | $flags{EXECUTE}; -$flags{More} = $flags{MORE} = $flags{All} | $flags{TRIE_MORE} | $flags{STATE}; +$flags{More} = $flags{MORE} = $flags{All} | $flags{TRIEC} | $flags{TRIEM} | $flags{STATE}; $flags{State} = $flags{DUMP} | $flags{EXECUTE} | $flags{STATE}; -$flags{TRIE} = $flags{DUMP} | $flags{EXECUTE} | $flags{TRIE_COMPILE}; +$flags{TRIE} = $flags{DUMP} | $flags{EXECUTE} | $flags{TRIEC}; my $installed =eval { require XSLoader; |