20 lines
218 B
ArmAsm
20 lines
218 B
ArmAsm
.define .putchar
|
|
.sect .text
|
|
.sect .rom
|
|
.sect .data
|
|
.sect .bss
|
|
.sect .text
|
|
|
|
.sect .text
|
|
|
|
! putchar, for a unix
|
|
|
|
.putchar:
|
|
enter [],0
|
|
movqd 1,tos
|
|
addr 8(fp),tos
|
|
movqd 1,tos
|
|
bsr __write
|
|
adjspb -12
|
|
exit []
|
|
ret 0
|