xref: /original-bsd/lib/libc/hp300/sys/execle.s (revision d5354517)
1/*-
2 * Copyright (c) 1990 The Regents of the University of California.
3 * All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * the Systems Programming Group of the University of Utah Computer
7 * Science Department.
8 *
9 * %sccs.include.redist.c%
10 */
11
12#if defined(LIBC_SCCS) && !defined(lint)
13	.asciz "@(#)execle.s	5.1 (Berkeley) 05/12/90"
14#endif /* LIBC_SCCS and not lint */
15
16#include "SYS.h"
17
18ENTRY(execle)
19	lea	sp@(4),a0
20	movl	a0,a1
21again:
22	tstl	a0@+
23	jne	again
24	movl	a0@,sp@-
25	pea	a1@(4)
26	movl	a1@,sp@-
27	jbsr	_execve
28	addl	#12,sp
29	rts		/* execle(file, arg1, arg2, ..., env); */
30