develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34388 - trunk/languages/perl6/src/parser

From:
pmichaud
Date:
December 26, 2008 09:48
Subject:
[svn:parrot] r34388 - trunk/languages/perl6/src/parser
Message ID:
20081226174820.20E4CCBA12@x12.develooper.com
Author: pmichaud
Date: Fri Dec 26 09:48:19 2008
New Revision: 34388

Modified:
   trunk/languages/perl6/src/parser/grammar.pg

Log:
[rakudo]:  Enable -> pointy blocks to be parsed as a term.  (RT #61672)


Modified: trunk/languages/perl6/src/parser/grammar.pg
==============================================================================
--- trunk/languages/perl6/src/parser/grammar.pg	(original)
+++ trunk/languages/perl6/src/parser/grammar.pg	Fri Dec 26 09:48:19 2008
@@ -902,3 +902,10 @@
 proto 'term:' is precedence('z=')
     is parsed(&expect_term)
     { ... }
+
+proto 'term:->' is equiv(term:)
+    is parsed(&pblock)
+    is skipkey(0)
+    { ... }
+
+proto 'close:<->' is equiv(term:) { ... }



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About