определение setf-экспандеров в Common Lisp
Вот в чем дело: я не получаю Сет-экспандеры и хотели бы узнать, как они работают.
Мне нужно узнать, как они работают, потому что у меня есть проблема, которая выглядит как типичный пример того, почему вы должны изучать setf-экспандеры, проблема заключается в следующем:
(defparameter some-array (make-array 10))
(defun arr-index (index-string)
(aref some-array (parse-integer index-string))
(setf (arr-index "2") 7) ;; Error: undefined function (setf arr-index)
Как мне написать правильный setf-expander для ARR-INDEX?