请各位高手帮忙,变量清除问题

bud · 发表于 2004-5-31 17:04:00

有一问题，请各位高手帮帮忙。在autolisp编程中会用到很多变量，因各个lisp程序不同，所以会造成在运行lisp程序后，会有许多的已被赋值的变量还存在于中。这些变量会不会占用太多的内存空间，影响ＣＡＤ的速度呢？除了定义为局部变量，还有没办法清除?（ＧＣ）可不可以？但我不知道如何用.

xhf · 发表于 2004-5-31 17:08:00

(sertq 变量 nil)可以释放变量所占用的内存空间
好象没有办法一次全部清除吧.

meflying · 发表于 2004-5-31 18:01:00

如果你连把你要的变量都做成局部变量都不愿意做的话，我想你在开发这方面不会有太大的发展，因为还有比这麻烦得多的事情。。。

bud · 发表于 2004-6-1 09:10:00

谢谢xhf的指教，感谢meflying的提醒。但是，并不是我不愿意把要的变量做成局部变量，只是有时在设计一个程序时，要用到多达的十几到二十来个变量，从程序架构上来说，定义太多局部变量影响可读性。所以想用一种更方便的方法。记得lisp中有个(gc)好象可以，meflying可否再指点指点(gc)的用途和用法.

雪山飞狐_lzh · 发表于 2004-6-1 09:26:00

定义太多局部变量影响可读性?
定义太多全局变量才会影响可读性

meflying · 发表于 2004-6-1 10:38:00

程序设计思路的问题。。。一般在主函数中的变量基本上都能做成局部变量，这点我想你也觉得没问题吧，如果有很多子函数，你不要在子函数中去改变或主函数中的任何变量，
如下面：
主函数：
(defun c:test(/ y)
   (setq y 4)
   (add)
   (princ y)
   (princ)
)
;子函数：
(defun add()
   (setq y (+ y 10))
)
;这样是不对的，这样你在设计子函数时就需要考虑主函数，而应该这样。
;主函数：
(defun c:test( / y)
   (setq y 4)
   (setq y (add y 10))
   (princ y)
   (princ)
)
;子函数：
(defun add(y / a b)
   (setq a (+ y b))
)
;这样，你在设计子函数时，完全不用考虑主函数使用了什么变量，我使用参数传递，
;子函数中的变量随便改成什么，都不会影响结果，主函数则只调用其返回值，与子函数
;使用了什么变量没有关系,而且，这样的子函数还能在别的地方使用，如：
(defun c:test( / y z)
   (setq y 4)
   (setq y (add y 10))
   (setq z (add z 4))
   (princ (list y z))
   (princ)
)

bud · 发表于 2004-6-1 21:02:00

Thank you ! meflying和各位的热心帮助! 以后向各位多多学习!

cqnj023 · 发表于 2004-6-1 23:23:00

同意

请各位高手帮忙,变量清除问题

发表回复

精选推荐