xref: /csrg-svn/lib/libc/tahoe/sys/execle.s (revision 29450)
1*29450Ssam/*
2*29450Ssam * Copyright (c) 1983 Regents of the University of California.
3*29450Ssam * All rights reserved.  The Berkeley software License Agreement
4*29450Ssam * specifies the terms and conditions for redistribution.
5*29450Ssam */
6*29450Ssam
7*29450Ssam#ifdef SYSLIBC_SCCS
8*29450Ssam_sccsid:.asciz	"@(#)execle.s	5.1 (Berkeley) 07/02/86"
9*29450Ssam#endif SYSLIBC_SCCS
10*29450Ssam
11*29450Ssam#include "SYS.h"
12*29450Ssam
13*29450SsamENTRY(execle)
14*29450Ssam	movw	-2(fp),r0	# removed word.
15*29450Ssam	subw2	$4,r0
16*29450Ssam	shar	$2,r0,r0	# num. of args.
17*29450Ssam	pushl	(fp)[r0]
18*29450Ssam	pushab	8(fp)
19*29450Ssam	pushl	4(fp)
20*29450Ssam	calls	$16,_execve
21*29450Ssam	ret		# execle(file, arg1, arg2, ..., env);
22