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 8ad3a9d211cd4204d946d7c009700b57e46e128b
parent 89263c9a9c2f5008bf14dfd03f6aa7311bb4aaac
Author: Alexander Burger <abu@software-lab.de>
Date:   Sat,  8 Oct 2011 06:41:54 +0200

Revert, not needed
Diffstat:
Msrc64/lib/asm.l | 6+-----
1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/src64/lib/asm.l b/src64/lib/asm.l @@ -1,4 +1,4 @@ -# 07oct11abu +# 23sep11abu # (c) Software Lab. Alexander Burger # *LittleEndian *AlignedCode *Registers optimize @@ -423,7 +423,6 @@ (cmpn (destination) "*Mode" (source) "*Mode" (source) "*Mode") (cnt (source) "*Mode") (dbg) - (dc2 (read)) (dec (destination) "*Mode") (div (source) "*Mode") (drop) @@ -531,9 +530,6 @@ (asm bytes (Lst) (prinst ".byte" (glue ", " Lst)) ) -(asm dc2 (Lst) - (prinst ".short" (glue ", " Lst)) ) - (asm hx2 (Lst) (prinst ".short" (glue ", " (mapcar hex Lst))) )