From: ceriel <none@none>
Date: Wed, 17 Apr 1985 13:38:36 +0000 (+0000)
Subject: Er zat een bug in het patroon
X-Git-Tag: release-5-5~5483
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=9c9976c1215a3929682dacdb86d0361488d9e665;p=ack.git

Er zat een bug in het patroon
lol adp stl met $1 < 0.
Ten onrechte werd in de gegenereerde code het AP register gebruikt.
Dit moest natuurlijk FP zijn.
---

diff --git a/mach/vax4/cg/table b/mach/vax4/cg/table
index 942fd12a8..51117dc10 100644
--- a/mach/vax4/cg/table
+++ b/mach/vax4/cg/table
@@ -1830,7 +1830,7 @@ lol adp stl $1==$3 && inreg($1)==2
 lol adp stl $1==$3 && $1<0
 		| |	remove(displaced)
 			remove(LOCALS,%[num]<=$1+3 && %[num]+%[size]>$1)
-			"addl2\t$$$2,$1(ap)" 
+			"addl2\t$$$2,$1(fp)" 
 			setcc({LOCAL4,LB,$1,4})	|	| |
 lol adp stl $1==$3 && $1>=0
 		| |	remove(displaced)