Files
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

27 lines
453 B
C

/* maketask call for unix */
int maketask(fname,flags,priority,argptrs)
char *fname;
int flags,priority;
char **argptrs;
{
register int pid;
if(flags==0) { /* fork and exec */
if((pid=fork()) == 0) { /* child process */
doexecv:
execv(fname,argptrs);
return(-1);
}
return(pid); /* return child process id */
}
if(flags==2) { /* fork only */
return(fork());
}
if(flags==4) { /* exec only */
goto doexecv;
}
return(-1);
}