Common Lisp - Ошибка между функциями: неопределенный оператор get-param в форме (get-param: mem) - PullRequest
Новая
       8

Common Lisp - Ошибка между функциями: неопределенный оператор get-param в форме (get-param: mem)

0 голосов
/ 09 декабря 2018

Я нахожусь в LispWorks, я вижу другой вопрос с этим названием, но ни один из них не помог мне.

Это код, который я пишу: 

(defun get-param (param)
  (lambda (state)
    (getf (cdr state) param)))

(defconstant get-acc
  (get-param ':acc))
(defconstant get-pc
  (get-param ':pc))

Звонящий из кода даетмне ошибка в названии. 

(defun add-instruction (xx state)
    (let* ((acc (funcall get-acc state))
             (new-acc (mod (+ acc xx) 1000))
             (new-flag (> 999 (+ acc xx)))
             (new-pc (+ 1 (funcall get-pc state)))
             (list 'state ':acc new-acc ':pc new-pc ':mem (funcall get-mem state))))

Заранее спасибо!

...