Code: Select all
sr@freen:~/newLISP$ newlisp
newLISP v.10.6.5 64-bit on Linux IPv4/6 UTF-8 libffi, options: newlisp -h
>
(set 'sy nil)
(define (f) (println 'sy:bar))
(delete 'sy)
(f)
nil
(lambda () (println 'sy:bar))
true
�~�:bar
bar:bar
>
Code: Select all
sr@freen:~/newLISP$ newlisp
newLISP v.10.6.5 64-bit on Linux IPv4/6 UTF-8 libffi, options: newlisp -h
>
(set 'sy nil)
(define (f) (println 'sy:bar))
(delete 'sy)
(f)
nil
(lambda () (println 'sy:bar))
true
�~�:bar
bar:bar
>
Code: Select all
newLISP v.10.6.5 64-bit on Linux IPv4/6 UTF-8 libffi, options: newlisp -h
>
(set 'sy nil)
(set 'foo MAIN)
(define (f) (foo:println 'sy:bar))
(delete 'sy)
f
nil
MAIN
(lambda () (foo:println 'sy:bar))
true
(lambda () (nil 'nil))
>