X-Git-Url: http://git.megacz.com/?p=sbp.git;a=blobdiff_plain;f=tests%2Fregression.tc;h=863b62ec262e8087af237093c78926bac62324e9;hp=6dabcb26c7d22ab149a6fb64335e2e6b669cddeb;hb=242a8711e98cbd3ed6d05271bf910fde38e9be9a;hpb=7783442fcff4e640ecdcbdb6149463048d32f7a7 diff --git a/tests/regression.tc b/tests/regression.tc index 6dabcb2..863b62e 100644 --- a/tests/regression.tc +++ b/tests/regression.tc @@ -41,8 +41,8 @@ testcase { output "1:{{a b} {c}}"; s ::= ids - ids ::= id (" " ids &~ id [~]*) => "1" - | id ( ids &~ id [~]*) => "2" + ids ::= id (" " ids &~ id ~[]*) => "1" + | id ( ids &~ id ~[]*) => "2" | id id ::= [a-z]++ } @@ -284,16 +284,16 @@ testcase { indent !::= ww outdent !::= " " outdent " " - | " " ([~]*) "\n" + | " " (~[]*) "\n" -any !::= [~]* +any !::= ~[]* s ::= any "\n\n" ww statement ww "\n\n" any => smt ww !::= sp* ws !::= sp** sp ::= " " block ::= "\n" indent blockBody - &~ "\n" outdent [~\ ] [~]* + &~ "\n" outdent ~[\ ] ~[]* blockBody ::= statement > statement blockBody /ws => "sbb"