hi!

there's no (setf standard-instance-access) in sbcl. the standard does not demand it, but still it's useful. the trivial implementation is:

(defun (setf standard-instance-access) (new-value instance location)
  (setf (clos-slots-ref (std-instance-slots instance) location) new-value))

and should probably go into src/pcl/slot.lisp, next to the standard-instance-access definition if there's no reason not to provide one.

same applies to:

(defun (setf funcallable-standard-instance-access) (new-value instance location)
  (setf (clos-slots-ref (fsc-instance-slots instance) location) new-value))

--
- attila

"- The truth is that I've been too considerate, and so became unintentionally cruel...
- I understand.
- No, you don't understand! We don't speak the same language!"
(Ingmar Bergman - Smultronstället)