[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

'with' bug

'expand-with-slots' uses 'slotd-accessor', but it is not
defined anywhere.....  It looks like this was not updated
when the ability to have multiple accessor functions on each
slot was added.

Try this:

(defclass bob () (a b) (:accessor-prefix ||) (:constructor make-bob))

(defmethod fred ((self bob)) (with (self) a))

(fred (make-bob))

;;; error ;;; pcl::slotd-accessor is undefined

		Rick Spickelmier
		UC Berkeley