godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

almost fixed problem with cfu

Browse Source
This commit is contained in:
ceriel 1988-04-27 16:57:43 +00:00
parent ff5eb6dffc
commit 154afef12f
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
mach/pdp/int/em_int.s
View File

@ -1645,17 +1645,21 @@ cuu.z:
jbr 6b
/-------
cfu.z:
mov (sp)+,r0
mov (sp)+,r1
mov $4,r0
jsr pc,setint
mov (sp)+,r0
jsr pc,setfloat
movf (sp)+,fr0
movfi fr0,-(sp)
/ unfortunately, this does not work for numbers >= 2^31
.if .test
jcs 9b
jlt 9b
.endif
next
mov $4,-(sp)
mov r1,-(sp)
jbr cuu_z
/-------
cfi.z:
mov (sp)+,r0