關於LISP中的函數有定義卻顯示錯誤是未定義函數
載入LISP後就直接顯示
;錯誤:no function definition: SELMENU
代碼:(defun c:test-1070821 ( / *error* pickfirst Sum)
;;取得設定的系統變數
(setq pickfirst (getvar "pickfirst"))
;;設定系統變數
(setvar "pickfirst" 0)
;;錯誤處理
(defun *error* (err)
;;恢復設定的系統變數值
(setvar "pickfirst" pickfirst)
(princ (strcat ";錯誤:" ...
↧