From: keie <none@none>
Date: Mon, 4 Mar 1985 15:33:28 +0000 (+0000)
Subject: The previous version still assumed two-byte integers.
X-Git-Tag: release-5-5~5576
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=d2a68477151f34bfb999d5e4e6b22c21dfdc08d6;p=ack.git

The previous version still assumed two-byte integers.
---

diff --git a/mach/m68k4/libem/trp.s b/mach/m68k4/libem/trp.s
index 1d5b4e902..6afacad17 100644
--- a/mach/m68k4/libem/trp.s
+++ b/mach/m68k4/libem/trp.s
@@ -3,10 +3,10 @@
 	.text
 .trp:
 	move.l	(sp)+,a2	! return address
-	move.w	(sp)+,d0	! error number
+	move.l	(sp)+,d0	! error number
 	move.l	a2,-(sp)
-	move.w	d0,-(sp)
-	cmp	#16,d0
+	move.l	d0,-(sp)
+	cmp.l	#16,d0
 	bcc	1f
 	btst	d0,.trpim
 	bne	3f
@@ -17,11 +17,13 @@
 	clr.l	.trppc
 	jsr	(a0)
 3:
-	add	#2,sp
+	add	#4,sp
 	rts
 9:
 	pea	fmt
 	jsr	.diagnos
+	add	#4,sp
+	jsr	__cleanup
 	jmp	EXIT
 
 	.data