Changeset 21922 for src/perl6

Timestamp:

08/17/08 22:16:16 (3 months ago)

Author:

lwall

Message:

[STD] fix Auzon++'s sig bug

Files:

• src/perl6/STD.pm (modified) (2 diffs)

src/perl6/STD.pm

@@ -858 +858 @@
         ]
         {*}                                                     #= value
+    | '(' <in: ')', 'signature'>
     | <postcircumfix>
         { $key = ""; $value = $<postcircumfix>; }
@@ -2545 +2546 @@
         ]
         [ $<quant> = <[ ? ! ]> { $kind = $<quant> } ]?
+    | <?> { $kind = '!' }
     ]