Fixed wrong mlu4.s
This commit is contained in:
parent
41da733a19
commit
90c699f418
@ -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~
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user