Last change
on this file since 4810254 was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago |
Added Alcyon C reference output.
|
-
Property mode
set to
100644
|
File size:
697 bytes
|
Rev | Line | |
---|
[7bf3856] | 1 | .globl _printf
|
---|
| 2 | .text
|
---|
| 3 | _printf:
|
---|
| 4 | ~~printf:
|
---|
| 5 | ~fmt=8
|
---|
| 6 | ~va_alist=12
|
---|
| 7 | link R14,#-4
|
---|
| 8 | movem.l R6-R7,-(sp)
|
---|
| 9 | ~count=R7
|
---|
| 10 | ~aptr=-4
|
---|
| 11 | *line 36
|
---|
| 12 | lea 12(R14),R8
|
---|
| 13 | move.l R8,-4(R14)
|
---|
| 14 | *line 37
|
---|
| 15 | move.l -4(R14),(sp)
|
---|
| 16 | move.l 8(R14),-(sp)
|
---|
| 17 | move.l #_fpsub,-(sp)
|
---|
| 18 | jsr _dofmt_
|
---|
| 19 | addq.l #8,sp
|
---|
| 20 | move.l R0,R7
|
---|
| 21 | *line 39
|
---|
| 22 | move.l R7,R0
|
---|
| 23 | bra L1
|
---|
| 24 | L1:tst.l (sp)+
|
---|
| 25 | movem.l (sp)+,R7-R7
|
---|
| 26 | unlk R14
|
---|
| 27 | rts
|
---|
| 28 | .text
|
---|
| 29 | _fpsub:
|
---|
| 30 | ~~fpsub:
|
---|
| 31 | ~c=8
|
---|
| 32 | link R14,#-4
|
---|
| 33 | *line 55
|
---|
| 34 | *line 56
|
---|
| 35 | cmp #10,8(R14)
|
---|
| 36 | bne L4
|
---|
| 37 | *line 56
|
---|
| 38 | move #13,(sp)
|
---|
| 39 | move #2,-(sp)
|
---|
| 40 | move #3,-(sp)
|
---|
| 41 | jsr _trap13
|
---|
| 42 | addq.l #4,sp
|
---|
| 43 | *line 57
|
---|
| 44 | L4:
|
---|
| 45 | *line 58
|
---|
| 46 | move 8(R14),(sp)
|
---|
| 47 | move #2,-(sp)
|
---|
| 48 | move #3,-(sp)
|
---|
| 49 | jsr _trap13
|
---|
| 50 | addq.l #4,sp
|
---|
| 51 | *line 59
|
---|
| 52 | move 8(R14),R0
|
---|
| 53 | bra L3
|
---|
| 54 | L3:unlk R14
|
---|
| 55 | rts
|
---|
| 56 | .data
|
---|
Note:
See
TracBrowser
for help on using the repository browser.