picolisp

commit 13f393ba82d88c896a206a53a26d6f9f9d0f4565
parent 6d762c6cffd2fadeabbef7e3ad75d818d3c21b69
Author: Alexander Burger <abu@software-lab.de>
Date:   Mon,  9 Jul 2012 13:45:42 +0200

Pretty-print flag for 'bind'
Diffstat:
M
ersatz/lib.l
 | 
2
+-
M
lib.l
 | 
4
++--

2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/ersatz/lib.l b/ersatz/lib.l
@@ -267,7 +267,7 @@
 ### Pretty Printing ###
 (de *PP
    T NIL if ifn when unless while until do case state for
-   with catch finally ! setq default push job use let let?
+   with catch finally ! setq default push bind job use let let?
    prog1 recur redef =: in out tab new )
 (de *PP1 let let? for redef)
 (de *PP2 setq default)
diff --git a/lib.l b/lib.l
@@ -1,4 +1,4 @@
-# 07apr12abu
+# 09jul12abu
 # (c) Software Lab. Alexander Burger
 
 (de task (Key . Prg)
@@ -314,7 +314,7 @@
 ### Pretty Printing ###
 (de *PP
    T NIL if ifn when unless while until do case state for
-   with catch finally co ! setq default push job use let let?
+   with catch finally co ! setq default push bind job use let let?
    prog1 later recur redef =: in out ctl tab new )
 (de *PP1 let let? for redef)
 (de *PP2 setq default)