picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE

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:
Mersatz/lib.l | 2+-
Mlib.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)