Problem in yesterday's new PCL

[doug@zaphod.prime.com (Douglas Rand)]

In defs.lisp there should be a line:

(defvar *variable-declarations* nil)

Also the line:

        #+:Lucid
        (system::define-macro `(deftype ,name) expand-fn nil)

should be modified for Prime's Common LISP:

        #+(and :Lucid (not prime))
        (system::define-macro `(deftype ,name) expand-fn nil)
	#+(and :Lucid Prime)
	(eval `(deftype ,name () '(satisfies ,predicate)))

Cheers,
Doug