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 5ad1c4766e3a888aabfd0062fc3ced7c8dfabc34
parent 046fd2ab24f54942b93b4bb069fda8c9689e9091
Author: Alexander Burger <abu@software-lab.de>
Date:   Mon,  2 Jan 2012 15:50:15 +0100

Cosmetics
Diffstat:
Mlib/http.l | 3++-
Mlib/misc.l | 3++-
Mlib/pilog.l | 3++-
Mlib/too.l | 3++-
4 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/lib/http.l b/lib/http.l @@ -1,4 +1,4 @@ -# 26nov11abu +# 02jan12abu # (c) Software Lab. Alexander Burger # *Home *Gate *Host *Port *Port1 *Port% *Http1 *Chunked @@ -448,6 +448,7 @@ (de http404 () (httpStat 404 "Not Found") ) +### Debug ### `*Dbg (noLint 'http '"O") diff --git a/lib/misc.l b/lib/misc.l @@ -1,4 +1,4 @@ -# 13jun11abu +# 02jan12abu # (c) Software Lab. Alexander Burger # *Allow *Tmp @@ -451,6 +451,7 @@ (out S (prinl "RCPT TO:" To "^M")) (pre? "250 " (in S (line T))) ) +### Debug ### `*Dbg # Hex Dump diff --git a/lib/pilog.l b/lib/pilog.l @@ -1,4 +1,4 @@ -# 20jul11abu +# 02jan12abu # (c) Software Lab. Alexander Burger # *Rule @@ -555,6 +555,7 @@ (repeat) +### Debug ### `*Dbg (load "@lib/sq.l") diff --git a/lib/too.l b/lib/too.l @@ -1,4 +1,4 @@ -# 14jun10abu +# 02jan12abu # (c) Software Lab. Alexander Burger ### DB Garbage Collection ### @@ -479,6 +479,7 @@ (prin ")") ) (T (print Obj)) ) ) +### Debug ### `*Dbg (noLint 'dbfMigrate 'iter)