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

d2 contains the remainder of dvu i.s.o. d3.

Browse source
This commit is contained in:
keie 1985-02-07 22:26:11 +00:00
parent c0d87aaa16
commit 00d75279e7
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
mach/m68k4/libem/printf.s
View file

@ -12,7 +12,7 @@ sav:
.long 0
.text
_printf:
movem.l d0/d1/d3/a0/a1/a2/a3/a4/a5/a6,.savreg
movem.l d0/d1/d2/a0/a1/a2/a3/a4/a5/a6,.savreg
move.l (sp)+,sav !return address
move.l sp,a6 !a6 <- address of arguments
move.l (a6)+,a5 !a5 <- address of format
@ -49,9 +49,9 @@ digit: move.l (a6)+,d1 !d1 <- integer
move.b #0,-(a3) !stringterminator
dloop: move.l d1,-(sp)
move.l #10,-(sp)
jsr .dvu !d1 <- quotient d3 <- remainder
add.l #'0',d3
move.b d3,-(a3)
jsr .dvu !d1 <- quotient d2 <- remainder
add.l #'0',d2
move.b d2,-(a3)
tst.l d1 !if quotient = 0 then ready
bne dloop
move.l a3,a2
@ -59,7 +59,7 @@ dloop: move.l d1,-(sp)
out:
move.l sav,-(sp)
movem.l .savreg,d0/d1/d3/a0/a1/a2/a3/a4/a5/a6
movem.l .savreg,d0/d1/d2/a0/a1/a2/a3/a4/a5/a6
rts