如何让自定义函数不再加载?

jaminth

请教各位,当前CAD中已加载了一个LISP文件,而该文件中包含了几个可以以命令运行的自定义函数(即以C:**定义的函数),

比如:

(defun c:1()

(defun c:2()

(defun c:3()

...

请求:  如果当前CAD已经加载3,如何检测出3已经加载了,而不用再重新加载.得以加快加载速度(当存在许多自定义函数时,确实有必要考虑这一问题!)

ZZXXQQ

如果分开写的文件可以用如下方法：

(if (/= (type c:3) 'SUBR) (load "3.lsp"))

Andyhon

简易型
(if C:3 nil (load "该文件"))