treat "abc"."def" as concat and not as dottyop

rakudo-p5 · Apr 5, 2013 · 3c0bdf6 · 3c0bdf6
1 parent f41550c
commit 3c0bdf6
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/lib/Perl6/P5Grammar.pm b/lib/Perl6/P5Grammar.pm
@@ -1188,7 +1188,7 @@ grammar Perl6::P5Grammar is HLL::Grammar does STD5 {
         <.newlex>
         <blockoid>
         #{ @*MEMOS[self.pos]<endstmt> := 2; }
-        #<.ws>
+        <.ws>
     }
 
     token block {
@@ -2956,6 +2956,10 @@ grammar Perl6::P5Grammar is HLL::Grammar does STD5 {
         <OPER=infix> <![=]>
     }
 
+    token dotty:sym<.> {
+        <!>
+    }
+
     token dotty:sym«->» {
         <sym> <dottyop>
         <O('%methodcall')>