common-lisp - Lisp SYMBOL-PACKAGE-LOCKED-ERROR

Question

私はLispが初めてなので、SBCLで関数を書いたとき

(defun subst (new old l)
  (cond   
   ((null l) '())
   ((eq old (car l)) (cons new (cdr l)))
   ((cons (car l) (subst new old (cdr l))))))

エラーSYMBOL-PACKAGE-LOCKED-ERROR、Style-Warning、およびWarningが発生します。解決してください