1985-02-07 22:59:50 +00:00
|
|
|
.define _dup
|
|
|
|
.define _dup2
|
1987-01-26 21:22:23 +00:00
|
|
|
.sect .text
|
|
|
|
.sect .rom
|
|
|
|
.sect .data
|
|
|
|
.sect .bss
|
|
|
|
.sect .text
|
1985-02-07 22:59:50 +00:00
|
|
|
.extern _dup
|
1987-01-26 21:22:23 +00:00
|
|
|
.sect .text
|
1985-02-07 22:59:50 +00:00
|
|
|
.extern _dup2
|
|
|
|
_dup2: or.l #64,4(sp)
|
|
|
|
|
|
|
|
_dup: trap #0
|
1987-01-26 21:22:23 +00:00
|
|
|
.data2 0x29
|
1985-02-07 22:59:50 +00:00
|
|
|
bcc 1f
|
|
|
|
jmp cerror
|
|
|
|
1:
|
|
|
|
rts
|