21 lines
217 B
ArmAsm
21 lines
217 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
|
|
asjspb -12
|
|
exit []
|
|
ret 0
|