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 85ae822e998b6463fef8b99cc3ab4712daa33ff1
parent fafa300ccd5d751df19b82d32926407336ddd579
Author: Alexander Burger <abu@software-lab.de>
Date:   Thu, 21 Apr 2011 08:12:52 +0200

Operand size glitch
Diffstat:
Msrc64/ht.l | 4++--
1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src64/ht.l b/src64/ht.l @@ -1,4 +1,4 @@ -# 20apr11abu +# 21apr11abu # (c) Software Lab. Alexander Burger (data 'HtData) @@ -534,7 +534,7 @@ skip CHUNK # <Y III> Chunk buffer : Newlines asciz "0\\r\\n\\r\\n" (code 'chrHex_AF 0) - ld B (Chr) + ld A (Chr) cmp B (char "0") # Decimal digit? if ge cmp B (char "9")