diff --git a/src/Perl6/Grammar.nqp b/src/Perl6/Grammar.nqp index 2701cfda155..d1a4de0ff1f 100644 --- a/src/Perl6/Grammar.nqp +++ b/src/Perl6/Grammar.nqp @@ -3688,7 +3688,7 @@ grammar Perl6::Grammar is HLL::Grammar does STD { ] | ] - | $ > <.typed_sorry: 'X::Syntax::Number::IllegalDecimal'>]? > + > > | <.terminator> | $ > <.typed_sorry: 'X::Syntax::Number::IllegalDecimal'>]? > [ <.sorry: "Only isolated underscores are allowed inside numbers"> ]? }