Fix for calling rules from EBNF text.
authorD Herring <dherring@at.tentpost.dot.com>
Sun, 1 Apr 2007 19:06:01 +0000 (15:06 -0400)
committerD Herring <dherring@at.tentpost.dot.com>
Sun, 1 Apr 2007 19:06:01 +0000 (15:06 -0400)
parser.lisp

index 05d37fe..dd770a6 100644 (file)
@@ -34,6 +34,7 @@
 (defmacro grammar-call (x)
   "Call function or macro x"
   (cond ((null x) (error "Cannot execute nil."))
+        ((stringp x) `(grammar-call ,(read-from-string x)))
         ((symbolp x) `(,x string :start start))
         ((listp x) x)
         (t (error "Cannot call ~S" x))))