From: ceriel <none@none>
Date: Fri, 30 Nov 1990 15:58:33 +0000 (+0000)
Subject: some more improvement to CUF
X-Git-Tag: release-5-5~1373
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=b76ff7451ca3784c6e68521a188108d37666feee;p=ack.git

some more improvement to CUF
---

diff --git a/mach/vax4/libem/cuf.s b/mach/vax4/libem/cuf.s
index 4e944fe9c..15a9ad54b 100644
--- a/mach/vax4/libem/cuf.s
+++ b/mach/vax4/libem/cuf.s
@@ -13,23 +13,23 @@
 	bneq    Ierr
 	cmpl    r0,$4
 	bneq    Idld
-	cvtlf   (sp)+,-(sp)
+	cvtld   (sp)+,-(sp)
 	bgeq    Iout
-	addf2	Itwo32f,(sp)
+	addd2	Itwo32F,(sp)
 Iout:
+	cvtdf	(sp)+,-(sp)
 	jmp     (r2)
 Idld:
 	cmpl    r0,$8
 	bneq    Ierr
 	cvtld   (sp)+,-(sp)
-	bgeq    Iout
+	bgeq    Iout2
 	addd2   Itwo32F,(sp)
+Iout2:
 	jmp     (r2)
 Ierr:
 	pushl	$EILLINS
 	jmp     .fat
 .sect .rom
-Itwo32f:
-	.data1 0200,0120,00,00
 Itwo32F:
 	.data1 0200,0120,00,00,00,00,00,00