Don't capture comments.

rakudo · May 26, 2012 · c297695 · c297695
1 parent 12b2cd7
commit c297695
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -144,7 +144,7 @@ grammar Perl6::Grammar is HLL::Grammar {
         # :dba('horizontal whitespace')
         [
         | ^^ <?before \h* '=' [ \w | '\\'] > <.pod_content_toplevel>
-        | \h* <comment>
+        | \h* <.comment>
         | \h+
         ]
     }
@@ -157,7 +157,7 @@ grammar Perl6::Grammar is HLL::Grammar {
 
     token comment:sym<#`(...)> {
         '#`' {}
-        [ <quote_EXPR> || <.typed_panic: 'X::Syntax::Comment::Embedded'> ]
+        [ <.quote_EXPR> || <.typed_panic: 'X::Syntax::Comment::Embedded'> ]
     }
 
     token comment:sym<#=(...)> {