diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/calc.lisp | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/examples/calc.lisp b/examples/calc.lisp index 4d8766a..d3140ee 100644 --- a/examples/calc.lisp +++ b/examples/calc.lisp @@ -6,7 +6,7 @@ (in-package #:argot.examples.calc) (deflanguage calc (:documentation "A calculator language") - (<calc> + (<start> :match (:or (:seq <subexpr> (:eof)) (:seq <value> (:eof)) @@ -16,9 +16,7 @@ (<expr> :match (:or <subexpr> <value> <unop> <binop>)) (<subexpr> - :match (:item) - :if listp - :then (argot:parse calc <subexpr>)) + :match (:{} calc)) (<value> :match (:item) :if numberp) |