ack/mach/ns/libem/prstr.s
1987-01-16 16:49:46 +00:00

24 lines
284 B
ArmAsm

.define .prstr
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
.sect .text
!het adres van de af te drukken string staat op de stack.
.prstr:
save [r1]
movd 8(sp), r1
1:
cmpqb 0, 0(r1)
beq 2f
movb 0(r1), tos
jsr @.putchar
addqd 1, r1
br 1b
2:
restore [r1]
ret 4