xref: /csrg-svn/lib/libc/tahoe/sys/execle.s (revision 34389)
129450Ssam/*
229450Ssam * Copyright (c) 1983 Regents of the University of California.
3*34389Sbostic * All rights reserved.
4*34389Sbostic *
5*34389Sbostic * Redistribution and use in source and binary forms are permitted
6*34389Sbostic * provided that this notice is preserved and that due credit is given
7*34389Sbostic * to the University of California at Berkeley. The name of the University
8*34389Sbostic * may not be used to endorse or promote products derived from this
9*34389Sbostic * software without specific written prior permission. This software
10*34389Sbostic * is provided ``as is'' without express or implied warranty.
1129450Ssam */
1229450Ssam
13*34389Sbostic#if defined(SYSLIBC_SCCS) && !defined(lint)
14*34389Sbostic_sccsid:.asciz	"@(#)execle.s	5.2 (Berkeley) 05/20/88"
15*34389Sbostic#endif /* SYSLIBC_SCCS and not lint */
1629450Ssam
1729450Ssam#include "SYS.h"
1829450Ssam
1929450SsamENTRY(execle)
2029450Ssam	movw	-2(fp),r0	# removed word.
2129450Ssam	subw2	$4,r0
2229450Ssam	shar	$2,r0,r0	# num. of args.
2329450Ssam	pushl	(fp)[r0]
2429450Ssam	pushab	8(fp)
2529450Ssam	pushl	4(fp)
2629450Ssam	calls	$16,_execve
2729450Ssam	ret		# execle(file, arg1, arg2, ..., env);
28