[climacs-cvs] CVS update: climacs/prolog-syntax.lisp

[Christophe Rhodes]

Update of /project/climacs/cvsroot/climacs
In directory common-lisp.net:/tmp/cvs-serv6641

Modified Files:
	prolog-syntax.lisp 
Log Message:
Parse [A,B]-style lists correctly.

Date: Sun Mar 27 18:22:46 2005
Author: crhodes

Index: climacs/prolog-syntax.lisp
diff -u climacs/prolog-syntax.lisp:1.2 climacs/prolog-syntax.lisp:1.3
--- climacs/prolog-syntax.lisp:1.2	Sun Mar 27 17:59:00 2005
+++ climacs/prolog-syntax.lisp	Sun Mar 27 18:22:45 2005
@@ -704,6 +704,8 @@
 (define-prolog-rule (items -> ((left exp) head-tail-separator (right exp)))
   (make-instance 'items-pair :exp left
                  :htsep head-tail-separator :texp right))
+(define-prolog-rule (items -> (exp))
+  (make-instance 'items :exp exp))
 
 ;;; 6.3.6
 (define-prolog-rule (term -> (open-curly term close-curly))