d0p1/ack
1
0
Fork 0
Code Issues Pull requests 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 420ca09aee
commit 2e009ecfff
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