Samuel W. Flint 5 роки тому
батько
коміт
1586361dbe
1 змінених файлів з 1 додано та 1 видалено
  1. 1 1
      xcsp-lang.lisp

+ 1 - 1
xcsp-lang.lisp

@@ -15,7 +15,7 @@
   (:lambda (expr)
     (string= expr "true")))
 
-(defrule identifier (+( character-ranges (#\A #\Z) (#\a #\z) (#\0 #\9)))
+(defrule identifier (+ (character-ranges (#\A #\Z) (#\a #\z) (#\0 #\9)))
   (:text t)
   (:lambda (text)
     (symbolicate (string-upcase text))))