Comment out a defun identifierp that's better done in fare-utils.
authorFrancois-Rene Rideau <tunes@google.com>
Wed, 29 Feb 2012 19:23:02 +0000 (14:23 -0500)
committerFrancois-Rene Rideau <tunes@google.com>
Wed, 29 Feb 2012 19:23:02 +0000 (14:23 -0500)
macros.lisp

index 7a12da2..632742e 100644 (file)
       (intern (symbol-name x) package)
       (error "~A isn't a keyword" x)))
 
+#| ; a better(?) version is in fare-utils/base/parse-cl-syntax.lisp
 (defun identifierp (x)
   (and (symbolp x)
        (not #+sbcl (sb-c::constantp x)
            #-sbcl (or (keywordp x) (typep x 'boolean)))))
+|#
 
 (defun decode-optional-spec (spec)
   (labels ((err () (error "invalid optional argument specification ~W" spec))