From: ceriel <none@none>
Date: Fri, 15 Jul 1988 11:17:17 +0000 (+0000)
Subject: improved trap handling
X-Git-Tag: release-5-5~3031
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=68d3126f1681ad94acb0626c043a9ed3fb44fe00;p=ack.git

improved trap handling
---

diff --git a/mach/mantra/int/mloop0 b/mach/mantra/int/mloop0
index 36bc9c3b8..b3bebc7f3 100644
--- a/mach/mantra/int/mloop0
+++ b/mach/mantra/int/mloop0
@@ -13,6 +13,9 @@
 	.define ml
 	.define argc
 	.define topstack
+#ifndef FPTRAP
+	.define __fptrp
+#endif
 .sect .text
 .sect .rom
 .sect .data
diff --git a/mach/mantra/int/mloopa b/mach/mantra/int/mloopa
index 6d56ccd23..f0c035927 100644
--- a/mach/mantra/int/mloopa
+++ b/mach/mantra/int/mloopa
@@ -41,6 +41,8 @@ error:		movem.l	d0/d1/d2/d3/d4/d5/d6/d7/a0/a1/a2/a3/a4/a5/a6,-(sp)
 		mov	60(sp),d0		!ERROR NUMBER IN d0
 		lea	retsize,a1
 		move.l	eb,a6			!JUST TO BE SURE
+		lea	retarea,a5		!JUST TO BE SURE
+		lea	loop,a4
 		move.l	#16,d1
 1:		move.w	-(a1),-(sp)
 		dbra	d1,1b