picolisp

commit 8ea23fc15ec7b3cfc1bb2d1ff968b98fff7071b0
parent f8747a1570a2f4d19181d22de628d36d897dddd9
Author: Alexander Burger <abu@software-lab.de>
Date:   Tue,  3 Jan 2012 19:09:59 +0100

'var' to use 'def' instead of plain 'put'
Diffstat:
M
lib.l
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib.l b/lib.l
@@ -1,4 +1,4 @@
-# 08nov11abu
+# 03jan12abu
 # (c) Software Lab. Alexander Burger
 
 (de task (Key . Prg)
@@ -265,7 +265,7 @@
 
 # Class variables
 (de var X
-   (put *Class (car X) (cdr X)) )
+   (def *Class (car X) (cdr X)) )
 
 (de var: X
    (apply meta X This) )