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 6a6ec58ac6d6f60f2592fe0bf5384977ca2d8678
parent 4571e47e8aa4d51523129596cf24e0e61392f34a
Author: Alexander Burger <abu@software-lab.de>
Date:   Tue, 10 May 2011 12:45:18 +0200

Global vs. local invocation
Diffstat:
Mlib/dbase.l | 4++--
Mlib/tex.l | 4++--
2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/dbase.l b/lib/dbase.l @@ -1,4 +1,4 @@ -# 10jul08abu +# 10may11abu # (c) Software Lab. Alexander Burger (de dbase (File) @@ -36,7 +36,7 @@ (rd 1) ) ) ) ) # Prec (rd 14) ) ) ) ) # Skip - (in (list "bin/utf2" "-dd" (pack "if=" File) (pack "bs=" Hdr) "skip=1") + (in (list "@bin/utf2" "-dd" (pack "if=" File) (pack "bs=" Hdr) "skip=1") (prog1 (make (do Cnt diff --git a/lib/tex.l b/lib/tex.l @@ -1,4 +1,4 @@ -# 03jun07abu +# 10may11abu # (c) Software Lab. Alexander Burger # Convert to PDF document @@ -78,7 +78,7 @@ ### TeX Document ### (de document (Doc Cls Typ Use . Prg) - (out (list "bin/lat1" (pack Doc ".tex")) + (out (list "@bin/lat1" (pack Doc ".tex")) (prinl "\\documentclass[" Cls "]{" Typ "}") (while Use (if (atom (car Use))