ack/mach/m68020/libsys/dup2.s

.define _dup2
.extern _dup2
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
_dup2:
link	a6,#0
move.l (12,a6),-(sp)
move.l #0,-(sp)
move.l (8,a6),-(sp)
jsr (_fcntl)
add.l #12,sp
unlk a6
rts
Initial revision 1987-01-29 22:36:35 +00:00			`.define _dup2`
			`.extern _dup2`
			`.sect .text`
			`.sect .rom`
			`.sect .data`
			`.sect .bss`
			`.sect .text`
fixed some bugs 1987-11-02 14:23:38 +00:00			`_dup2:`
			`link a6,#0`
			`move.l (12,a6),-(sp)`
			`move.l #0,-(sp)`
			`move.l (8,a6),-(sp)`
corrected a syntax error 1988-04-20 15:28:26 +00:00			`jsr (_fcntl)`
fixed some bugs 1987-11-02 14:23:38 +00:00			`add.l #12,sp`
			`unlk a6`
			`rts`