Changeset 21219 for src/perl6/STD.pm

Timestamp:

07/04/08 15:54:22 (5 months ago)

Author:

pmichaud

Message:

STD.pm: {*} for all alternatives in <dec_number>, not just last

Files:

• src/perl6/STD.pm (modified) (1 diff)

src/perl6/STD.pm

@@ -1604 +1604 @@
 # careful to distinguish from both integer and 42.method
 token dec_number {
+    [
     |            '.' \d+[_\d+]* <escale>?
     | \d+[_\d+]* '.' \d+[_\d+]* <escale>?
     | \d+[_\d+]*                <escale>
+    ]
     {*}
 }