xref: /csrg-svn/lib/libc/vax/sys/fork.s (revision 21806)
1/*
2 * Copyright (c) 1983 Regents of the University of California.
3 * All rights reserved.  The Berkeley software License Agreement
4 * specifies the terms and conditions for redistribution.
5 */
6
7#ifndef lint
8static char sccsid[] = "@(#)fork.s	5.1 (Berkeley) 06/03/85";
9#endif not lint
10
11#include "SYS.h"
12
13SYSCALL(fork)
14	jlbc	r1,1f	# parent, since r1 == 0 in parent, 1 in child
15	clrl	r0
161:
17	ret		# pid = fork()
18