Browse Source

Fix formatting/typo

Samuel W. Flint 4 years ago
parent
commit
1586361dbe
1 changed files with 1 additions and 1 deletions
  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))))