Don't look for -> during interpolation, masak++

TimToady · TimToady · commit 7c1758644c11 · 2013-09-06T10:24:56.000-07:00
diff --git a/STD.pm6 b/STD.pm6
@@ -3590,6 +3590,7 @@ grammar P6 is STD {
 
     token postfix:sym['->'] () {
         '->'
+        <!{ $*QSIGIL }>
         [
         | <brack=[ \[ \{ \( ]> <.obs("'->" ~ $<brack>.Str ~ "' as postfix dereferencer", "'." ~ $<brack>.Str ~ "' or just '" ~ $<brack>.Str ~ "' to deref, or whitespace to delimit a pointy block")>
         | <.obs('-> as postfix', 'either . to call a method, or whitespace to delimit a pointy block')>

Original file line number	Diff line number	Diff line change
`@@ -3590,6 +3590,7 @@ grammar P6 is STD {`
`3590`	`3590`
`3591`	`3591`	`token postfix:sym['->'] () {`
`3592`	`3592`	`'->'`
	`3593`	`+ <!{ $*QSIGIL }>`
`3593`	`3594`	`[`
`3594`	`3595`	`\| <brack=[ \[ \{ \( ]> <.obs("'->" ~ $<brack>.Str ~ "' as postfix dereferencer", "'." ~ $<brack>.Str ~ "' or just '" ~ $<brack>.Str ~ "' to deref, or whitespace to delimit a pointy block")>`
`3595`	`3596`	`\| <.obs('-> as postfix', 'either . to call a method, or whitespace to delimit a pointy block')>`