xref: /csrg-svn/lib/libc/hp300/sys/execl.s (revision 41845)
1*41845Sbostic/*-
2*41845Sbostic * Copyright (c) 1990 The Regents of the University of California.
3*41845Sbostic * All rights reserved.
4*41845Sbostic *
5*41845Sbostic * This code is derived from software contributed to Berkeley by
6*41845Sbostic * the Systems Programming Group of the University of Utah Computer
7*41845Sbostic * Science Department.
8*41845Sbostic *
9*41845Sbostic * %sccs.include.redist.c%
10*41845Sbostic */
11*41845Sbostic
12*41845Sbostic#if defined(LIBC_SCCS) && !defined(lint)
13*41845Sbostic	.asciz "@(#)execl.s	5.1 (Berkeley) 05/12/90"
14*41845Sbostic#endif /* LIBC_SCCS and not lint */
15*41845Sbostic
16*41845Sbostic#include "SYS.h"
17*41845Sbostic
18*41845SbosticENTRY(execl)
19*41845Sbostic	lea	sp@(4),a0
20*41845Sbostic	pea	a0@(4)
21*41845Sbostic	movl	a0@,sp@-
22*41845Sbostic	jbsr	_execv
23*41845Sbostic	addql	#8,sp
24*41845Sbostic	rts		/* execl(file, arg1, arg2, ..., 0); */
25