Code: Select all
sr@freen:~/newLISP_Core/mirror$ ./newlisp
newLISP v.10.7.1 64-bit on Linux IPv4/6 UTF-8 libffi, options: newlisp -h
> (set 'v nil 'r (string "foo")) (sys-info 0)
"foo"
442
> (set 'v nil 'r (string "foo")) (sys-info 0)
"foo"
443
>
;; no mem leak:
(set 'r (string "foo")) (sys-info 0)
"foo"
443
>