Author: pmichaud
Date: Thu Apr 5 08:36:35 2007
New Revision: 18001
Added:
trunk/t/compilers/pge/perl6regex/rx_subrules
- copied, changed from r17999, /trunk/t/compilers/pge/p6regex/rx_subrules
Modified:
trunk/MANIFEST
trunk/t/compilers/pge/perl6regex/01-regex.t
Log:
[pge]:
* Merge in rx_subrules from p6regex and pugs.
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Thu Apr 5 08:36:35 2007
@@ -2753,6 +2753,7 @@
t/compilers/pge/perl6regex/rx_lookarounds []
t/compilers/pge/perl6regex/rx_metachars []
t/compilers/pge/perl6regex/rx_modifiers []
+t/compilers/pge/perl6regex/rx_subrules []
t/compilers/pge/pge-hs.t []
t/compilers/pge/pge.t []
t/compilers/pge/pge_examples.t []
Modified: trunk/t/compilers/pge/perl6regex/01-regex.t
==============================================================================
--- trunk/t/compilers/pge/perl6regex/01-regex.t (original)
+++ trunk/t/compilers/pge/perl6regex/01-regex.t Thu Apr 5 08:36:35 2007
@@ -75,7 +75,7 @@
push test_files, 'rx_metachars'
push test_files, 'rx_backtrack'
push test_files, 'rx_charclass'
- # push test_files, 'rx_subrules'
+ push test_files, 'rx_subrules'
push test_files, 'rx_lookarounds'
push test_files, 'rx_captures'
push test_files, 'rx_modifiers'
Copied: trunk/t/compilers/pge/perl6regex/rx_subrules (from r17999,
/trunk/t/compilers/pge/p6regex/rx_subrules)
==============================================================================
--- /trunk/t/compilers/pge/p6regex/rx_subrules (original)
+++ trunk/t/compilers/pge/perl6regex/rx_subrules Thu Apr 5 08:36:35 2007
@@ -1,3 +1,4 @@
+## builtin subrules
abc <fail> def \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij n
<fail>
<?wb>def abc\ndef\n-==\nghi y word boundary \W\w
@@ -5,13 +6,13 @@
<?wb>abc abc\ndef\n-==\nghi y BOS word boundary
ghi<?wb> abc\ndef\n-==\nghi y EOS word boundary
a<?wb> abc\ndef\n-==\nghi n \w\w word boundary
--<?wb> abc\ndef\n-==\nghi n \W\W word boundary
+\-<?wb> abc\ndef\n-==\nghi n \W\W word
boundary
<!wb>def abc\ndef\n-==\nghi n nonword boundary \W\w
abc<!wb> abc\ndef\n-==\nghi n nonword boundary \w\W
<!wb>abc abc\ndef\n-==\nghi n BOS nonword boundary
ghi<!wb> abc\ndef\n-==\nghi n EOS nonword boundary
a<!wb> abc\ndef\n-==\nghi y \w\w nonword boundary
--<!wb> abc\ndef\n-==\nghi y \W\W nonword boundary
+\-<!wb> abc\ndef\n-==\nghi y \W\W nonword
boundary
<upper> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<upper>: <A @ 45>/
<upper>
<?upper> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <A @ 45>/
<?upper>
@@ -28,9 +29,9 @@
<xdigit> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<xdigit>: <0 @ 35>/
<xdigit>
<?xdigit> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <0 @ 35>/
<?xdigit>
<?xdigit>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <0123456789ABCDEF @ 35>/
<?xdigit>+
-<space> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<space>: <\s* @ 0>/
<space>
-<?space> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\s* @ 0>/
<?space>
-<?space>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\s* @ 0>/
<?space>+
+<space> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<space>: <\t @ 0>/
<space>
+<?space> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\t @ 0>/ <?space>
+<?space>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\t\n\r @ 0>/
<?space>+
<blank> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<blank>: <\t @ 0>/
<blank>
<?blank> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\t @ 0>/
<?blank>
<?blank>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\t @ 0>/
<?blank>+
@@ -39,7 +40,7 @@
<?cntrl>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <\t\n\r @ 0>/
<?cntrl>+
<punct> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<punct>: <! @ 4>/
<punct>
<?punct> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <! @ 4>/
<?punct>
-<?punct>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <.*\} @ 4>/
<?punct>+
+<?punct>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <!"#$%&/ <?punct>+
<alnum> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob<alnum>: <0 @ 35>/
<alnum>
<?alnum> \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob: <0 @ 35>/ <?alnum>
<?alnum>+ \t\n\r !"#$%&'()*+,-./:;<=>[EMAIL
PROTECTED]|}0123456789ABCDEFGHIJabcdefghij /mob:
<0123456789ABCDEFGHIJabcdefghij @ 35>/ <?alnum>+