[BACK]Return to dup.s CVS log [TXT] [DIR] Up to [Research Unix] / researchv10no / libc / sys
File:  [Research Unix] / researchv10no / libc / sys / dup.s
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:35 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

# C library -- dup

#	f = dup(of [ ,nf])
#	f == -1 for error

	.set	dup,41
.globl	_dup
.globl	_dup2
.globl	cerror

_dup2:
	.word	0x0000
	bisb2	$0100,4(ap)
	brb	L1
_dup:
	.word	0x0000
L1:
	chmk	$dup
	bcc 	noerror
	jmp 	cerror
noerror:
	ret
unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.