wrongly warns on x ** {3} and such

TimToady · TimToady · commit 62fce7837342 · 2011-09-26T14:55:08.000-07:00
diff --git a/STD.pm6 b/STD.pm6
@@ -5157,7 +5157,7 @@ grammar Regex is STD {
         | \d+ \s+ '..' <.panic: "Spaces not allowed in bare range">
         | (\d+) [ '..' [ (\d+) { $¢.panic("Empty range") if $0.Str > $1[0].Str } | '*' | <.panic: "Malformed range"> ] ]?
         | <embeddedblock>
-        | <quantified_atom> <.worryobs("atom ** " ~ $<quantified_atom>.Str ~ " as separator", "atom+ % " ~ $<quantified_atom>.Str, "nowadays")>
+        | {} <quantified_atom> <.worryobs("atom ** " ~ $<quantified_atom>.Str ~ " as separator", "atom+ % " ~ $<quantified_atom>.Str, "nowadays")>
         ]
     }
 

Original file line number	Diff line number	Diff line change
`@@ -5157,7 +5157,7 @@ grammar Regex is STD {`
`5157`	`5157`	`\| \d+ \s+ '..' <.panic: "Spaces not allowed in bare range">`
`5158`	`5158`	`\| (\d+) [ '..' [ (\d+) { $¢.panic("Empty range") if $0.Str > $1[0].Str } \| '*' \| <.panic: "Malformed range"> ] ]?`
`5159`	`5159`	`\| <embeddedblock>`
`5160`		`- \| <quantified_atom> <.worryobs("atom ** " ~ $<quantified_atom>.Str ~ " as separator", "atom+ % " ~ $<quantified_atom>.Str, "nowadays")>`
	`5160`	`+ \| {} <quantified_atom> <.worryobs("atom ** " ~ $<quantified_atom>.Str ~ " as separator", "atom+ % " ~ $<quantified_atom>.Str, "nowadays")>`
`5161`	`5161`	`]`
`5162`	`5162`	`}`
`5163`	`5163`