那么,有缺陷的功能如下:
(defun make-matrix (n)
(make-array (n n) :initial-element 0))
Run Code Online (Sandbox Code Playgroud)
我想使用像(make-matrix 8)
更换更长时间的函数(make-array '(8 8) :initial-element 0)
,但CLISP说有一个错误(n n)
,因为n
它不是一个定义的函数.我该如何写这个make-matrix
函数?