获取错误“；变量AREF没有值“；尝试逐个打印数组元素时在CLISP中

我试图在CLISP中打印数组的值，我在下面的函数中写道：

(setq x (make-array '5 :initial-contents '(a b c d e)))
(loop for i from 0 to 4 do (write aref x i))

但我犯了一个错误

*** - PROGN: variable AREF has no value 
      The following restarts are available:
 USE-VALUE      :R1      Input a value to be used instead of AREF.
 STORE-VALUE    :R2      Input a new value for AREF.

我对CLISP完全陌生，不明白为什么会出现上述错误。

是一个函数，而不是一个变量。 它周围缺少一组括号：

（aref x i）

：

或者只是

(loop for e across x do (write e))

请注意，这是一个 相对低级的功能。 您可能需要使用

print

或

princ

的变体

(loop for e across x do (write e))