[求助]：LISP中定义函数的困难！

xxxyzxx

编了个小程序，第一了主函数和子函数，也定义了aa等临时变量，但某些临时变量非常有用，想能单独调出来使（是定义成单独的主函数－－已经试过，不好使，555－－还是有其它方法？）请兄弟们给予帮助，谢谢！

(defun c:mj(/ aa bb na nb)

ll_j

问题说得不太清楚，我试着回答，供参考。
首先，如果在函数中将变量“申明”为局部函数，则不会对其他的函数影响，但如果在同一函数中，或者在全部被当作全局变量时，如果变量同时被定义成不同性质则可能出错，就是说，在a函数中使用aa局部变量，此时可以在与a无关的函数中使用aa为全局变量，甚至也可以定义为函数，完全没有影响，但如果在a函数中将aa赋予一种类型，同时在a函数中（或者在与a函数有关联的c函数中）将aa变量赋予另一种类型（如数值和表、表和函数等），则会出错，有时甚至出现“致命错误”。

xxxyzxx

原先刚开始接触LISP，说得不清楚，现举例说明：
1.
(defun c:mj(/ aa bb na nb)
……
)
(defun mjs(/ aa bb na nb)
……
)

2.
(defun c:tj(/ aa bb na nb)
……
)

假使有1.2两个LISP想，用2调用1中主函数或子函数的值，或者调用1中的函数，如何才能作到？

tiepi

不是一样的吗？什么叫临时变量啊？？

ll_j

最初由 xxxyzxx 发布
[B]原先刚开始接触LISP，说得不清楚，现举例说明：
1.
(defun c:mj(/ aa bb na nb)
……
)
(defun mjs(/ aa bb na nb)
……
)

2.
(defun c:tj(/ aa bb na nb)
……
)

假使有1.2两个LISP想，用2调用1... [/B]

调用其他程序的函数需要“加载”和“调用”，在程序中这样体现：
[php](defun c:tj(/ aa bb na nb)
  ...
  (load "mj")        ;加载，假定程序1名称为mj.lsp，并且在支持路径下
  (c:mj)         ;调用mj外部函数
  ...
  (mjs)         ;调用函数mjs
  ...
)[/php]
此时不必担心局部函数冲突（全局函数不能冲突），Lisp会将局部函数自动处理，你可以看看我在http://www.xdcad.net/forum/showt ... 1523305#post1523305 10楼中贴出的代码，看看a1、a2的变化过程。

zk_hisen

学习学习，全局变量和局部变量的确是很头疼的问题。