ack/mach/ns/libem/sts.s

33 lines
327 B
ArmAsm
Raw Permalink Normal View History

1985-07-26 11:56:24 +00:00
.define .sts
1987-01-16 16:49:46 +00:00
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
1985-07-26 11:56:24 +00:00
1987-01-16 16:49:46 +00:00
.sect .text
1985-07-26 11:56:24 +00:00
.sts:
1991-09-18 19:10:24 +00:00
movd tos, r3
1985-07-26 11:56:24 +00:00
movd tos, r0
movd tos, r1
cmpqd 1, r0
beq 1f
cmpqd 2, r0
beq 2f
3:
movd tos, 0(r1)
addqd 4, r1
acbd -4, r0, 3b
4:
1991-09-18 19:10:24 +00:00
movd r3, tos
1985-07-26 11:56:24 +00:00
ret 0
1:
movb tos, 0(r1)
adjspd -3
br 4b
2:
movw tos, 0(r1)
adjspd -2
br 4b