[求助]：关于子函数中的局部变量？

nuance

先设定，情况1：子函数被定义在主函数之内，并且子函数名被定义为局部变量。情况2：子函数被定义在主函数之外。
问题1，若子函数有形参，像defun (a / b)，在两种情况下怎样将a定义为局部变量？
问题2，若子函数没有形参，直接沿用主函数变量，那是不是在主函数中将变量定义为局部变量即可？我还没想明白问题2是否也有情况1和情况2。

xyp1964

太绕口了，不懂！呵呵……
写个实际的程序来讨论吧。

nuance

简单说就是如果我把子函数定义在主程序之内，并将子函数名定义为局部变量，就等同于把子函数中的形参也定义为了局部变量？
(defun c:xxx (/ a e f  )
   (defun a (b c / d)...)
  (a e f)
)
定义了阿a，就相当于定义了a,b,c？

xyp1964

最初由 nuance 发布
[B]简单说就是如果我把子函数定义在主程序之内，并将子函数名定义为局部变量，就等同于把子函数中的形参也定义为了局部变量？
(defun c:xxx (/ a e f  )
   (defun a (b c / d)...)
  (a e f)
)
定义了阿a，就相当... [/B]

那就真乱套了！
还是写个比较完整的实例试试吧！

狂刀

最初由 nuance 发布
[B]简单说就是如果我把子函数定义在主程序之内，并将子函数名定义为局部变量，就等同于把子函数中的形参也定义为了局部变量？
(defun c:xxx (/ a e f  )
   (defun a (b c / d)...)
  (a e f)
)
定义了阿a，就相当... [/B]

不对！
不管是主函数，子函数，行参都必须放在/之后
主函数 / 之前及子函数 / 之前且未被主函数放到 / 之后的参数的都是全局变量

yxpxa

建议你把所有的子程序都放在主程序外，作为研究可以，但实际用的时候还是规范些好，便于调试和维护。
*error* 也可以放在主程序外， 在主程序中用(setq *error* err) 就行了;;err是你自己的错误处理函数

nuance

我是习惯将子函数定义在主函数之内，这样可以避免考虑函数重名的问题。

yuer0103

将子函数可以定义在主函数之内，可以定义在主函数之外。这两种方法本人都经常用的，但应避免考虑函数重名的问题，这样可以让程序尽量少出一些错