Commit f22dfd20 authored by Marco Antoniotti's avatar Marco Antoniotti

Fixed usual problem with DEFCONSTANT and SBCL.

parent 9756062f
...@@ -27,9 +27,16 @@ result : a lambda-expression taking no arguments.")) ...@@ -27,9 +27,16 @@ result : a lambda-expression taking no arguments."))
(declaim (ftype (function (t) t) ook?)) (declaim (ftype (function (t) t) ook?))
#-sbcl
(defconstant +ooks+ '(ook. ook? ook!) (defconstant +ooks+ '(ook. ook? ook!)
"Need we say more?") "Need we say more?")
#+sbcl ; Fascist SBCL!!!!!
(defparameter +ooks+ '(ook. ook? ook!)
"Need we say more?")
(defconstant monkey?!? 'monkey?!? (defconstant monkey?!? 'monkey?!?
"You are in trouble if you call him 'monkey'!") "You are in trouble if you call him 'monkey'!")
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment