use new splice & hide chars

8 years ago · 7c21df6ed4
parent c985805703
commit 7c21df6ed4
1 changed files with 4 additions and 2 deletions
--- a/beautiful-racket/br/demo/txtadv/parser.rkt
+++ b/beautiful-racket/br/demo/txtadv/parser.rkt
@ -4,9 +4,11 @@ txtadv-program : verb-section everywhere-section things-section places-section s

 verb-section : !"===VERBS===" verb-item+

-!verb-item : verb-name+ s-exp
+!verb-item :  verb next-verb* s-exp

-!verb-name : [!","] ID ["_"]
+!verb : ID ["_"]
+
+@next-verb : [!","] verb

 everywhere-section : !"===EVERYWHERE===" id-desc+