wanchr 发表于 2019-11-9 20:39:30

内存用什么法子一次回收

(defun a()
(setq a1 3 a2 5 a3 "abc")
(setq a4 '(a))
)
简单有一下子回收内存方法吗

lisperado 发表于 2019-11-10 13:05:07

本帖最后由 lisperado 于 2019-11-10 15:08 编辑

虽然不是很明白内存意思是指变量吧?

参数存于表里(list)
(setq a '( 3 5.0 "abc" a))

(mapcar 'set ' ( a1 a2 a3 a4 ) a)

a1 ; 3
a2 ; 5.0
a3 ; "abc"
(eval a4) ; (3 5.0 "abc" A)
针对一些不用习惯local variable(局部变量)用户,
;global variable另类回收
(foreach x ' ( a1 a2 a3 a4 )
(set 'x nil)
)







satan421 发表于 2019-11-10 13:04:24

(defun a( / a1 a2 a3 a4)
(setq a1 3 a2 5 a3 "abc")
(setq a4 '(a))
)
页: [1]
查看完整版本: 内存用什么法子一次回收