File tree Expand file tree Collapse file tree 2 files changed +6
-1
lines changed Expand file tree Collapse file tree 2 files changed +6
-1
lines changed Original file line number Diff line number Diff line change @@ -499,9 +499,10 @@ grammar NQP::Grammar is HLL::Grammar {
499
499
| $ < proto > =[proto] [regex| token| rule]
500
500
<deflongname >
501
501
[
502
+ || '{*}' <?ENDSTMT >
502
503
|| '{' '<...>' '}' <?ENDSTMT >
503
504
|| '{' '<*>' '}' <?ENDSTMT >
504
- || <.panic : "Proto regex body must be <*> ( or <...>, which is deprecated)" >
505
+ || <.panic : "Proto regex body must be \{*\} (or <*> or <...>, which are deprecated)" >
505
506
]
506
507
| $ < sym > =[regex| token| rule]
507
508
<deflongname >
Original file line number Diff line number Diff line change @@ -87,6 +87,10 @@ role NQPCursorRole {
87
87
$ ! pos := -3 ;
88
88
}
89
89
90
+ method ! protoregex ($ name ) {
91
+ pir:: say ($ name );
92
+ }
93
+
90
94
method ! BACKREF ($ name ) {
91
95
my $ cur := self . " !cursor_start" ();
92
96
my $ n := $ ! cstack ?? nqp :: elems ($ ! cstack ) - 1 !! -1 ;
You can’t perform that action at this time.
0 commit comments