d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fixed wrong mlu4.s

Browse source
This commit is contained in:
ceriel 1987-04-23 14:47:28 +00:00
parent 41da733a19
commit 90c699f418
1 changed files with 5 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
mach/pdp/libem/mlu4.s
View file

@ -5,20 +5,18 @@
mlu4~:
jsr pc,save~
clr r0
mov 02(sp),r1
clr r1
mov 02(sp),r0
mov 06(sp),r3
mul r3,r0
tst r3
bge 1f
ashc $15.,r0
add 02(sp),r0
1: mov 02(sp),r3
clr r2
mul 04(sp),r2
mul 04(sp),r3
add r3,r0
mov 06(sp),r3
clr r2
mul (sp),r2
mul (sp),r3
add r3,r0
add $010,sp
jmp retu~