ack/mach/z80/libem/sdf.s
1987-02-02 13:30:20 +00:00

26 lines
287 B
ArmAsm

.define .sdf
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
! store double offsetted
.sdf:
pop bc
push bc !test
pop ix ! return address
pop hl ! address
add hl,de
pop bc
ld (hl),c
inc hl
ld (hl),b
inc hl
pop bc
ld (hl),c
inc hl
ld (hl),b
jp (ix) ! return