#include	<alef.h>#include	"run.h" int	_exec(byte*, byte**);void	ALEF_lockrele(void); internvoidALEF_etrans(byte *name, byte **argv){	void *s;	byte e[ERRLEN]; 	s = PROC.tdb->ctask->stack;	free(s);	ALEF_lockrele();	_exec(name, argv);	errstr(e);	_exits(e);} intexec(byte *name, byte **argv){	int l, n, i;	byte **sp, **p, *aspace; 	if(PROC.tdb->ntask != 1) {		werrstr("proc has more than one task");		return -1;	}	if(access(name, 1) < 0)		return -1; 	n = 0;	p = argv;	while(*p++)		n++;	n += 4; 	sp = (byte**)Execstk;	aspace = (byte*)sp + sizeof(byte*)*n; 	l = strlen(name)+1;	memmove(aspace, name, l);	*sp++ = aspace;	aspace += l; 	*sp = (byte*)sp+4;	sp++;	while(*argv) {		l = strlen(*argv)+1;		memmove(aspace, *argv, l);		*sp++ = aspace;		aspace += l;		argv++;	}	*sp = nil;	ALEF_linksp(&i, (byte*)Execstk, ALEF_etrans); 	return 0;	/* Not reached */}