xref: /original-bsd/lib/libc/tahoe/sys/execle.s (revision 2bb802fc)
1/*
2 * Copyright (c) 1983 Regents of the University of California.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms are permitted
6 * provided that the above copyright notice and this paragraph are
7 * duplicated in all such forms and that any documentation,
8 * advertising materials, and other materials related to such
9 * distribution and use acknowledge that the software was developed
10 * by the University of California, Berkeley.  The name of the
11 * University may not be used to endorse or promote products derived
12 * from this software without specific prior written permission.
13 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16 */
17
18#if defined(SYSLIBC_SCCS) && !defined(lint)
19	.asciz "@(#)execle.s	5.3 (Berkeley) 06/27/88"
20#endif /* SYSLIBC_SCCS and not lint */
21
22#include "SYS.h"
23
24ENTRY(execle)
25	movw	-2(fp),r0	# removed word.
26	subw2	$4,r0
27	shar	$2,r0,r0	# num. of args.
28	pushl	(fp)[r0]
29	pushab	8(fp)
30	pushl	4(fp)
31	calls	$16,_execve
32	ret		# execle(file, arg1, arg2, ..., env);
33