Changeset 22600 for src/perl6

Timestamp:

10/14/08 01:10:23 (6 weeks ago)

Author:

lwall

Message:

[STD] workaround for elsif problem; put extra [] to move quantifier outside of binding

Files:

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

src/perl6/STD.pm

@@ -731 +731 @@
     <sym> :s
     <xblock>
-    $<elsif> = (
+    [$<elsif> = (
         'elsif'<?spacey> <xblock>       {*}                #= elsif
-    )*
-    $<else> = (
+    )]*
+    [$<else> = (
         'else'<?spacey> <pblock>       {*}             #= else
-    )?
+    )]?
 }