ack/mach/vax4/libbsd4_1a/_dup.s

22 lines
235 B
ArmAsm
Raw Permalink Normal View History

1990-01-19 16:03:46 +00:00
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define __dup
.define __dup2
dup = 41
.align 1
__dup:
.data2 0x0000
brb 1f
.align 1
__dup2:
.data2 0x0000
bisb2 $0100,4(ap)
1:
chmk $dup
bcc 1f
jmp errmon
1:
ret