From: ceriel <none@none>
Date: Mon, 2 Feb 1987 20:48:02 +0000 (+0000)
Subject: ASP with negative argument wasn't accepted
X-Git-Tag: release-5-5~4802
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=d70c1e21490e4591f50859d83f6704ea8bd9cc0c;p=ack.git

ASP with negative argument wasn't accepted
---

diff --git a/mach/z80/cg/table b/mach/z80/cg/table
index 71e265549..fd05c71e5 100644
--- a/mach/z80/cg/table
+++ b/mach/z80/cg/table
@@ -1271,7 +1271,7 @@ ret  		| |		remove(ALL)
 
 
 asp $1 == 0 | | | | |
-asp $1 > 0 | STACK | 		remove(ALL) allocate(HL_REG)
+asp $1 != 0 | STACK | 		remove(ALL) allocate(HL_REG)
 				move({IMMEDIATE,$1} , HL)
 				"add hl,sp"
 				"ld sp,hl"