Lines Matching refs:interp
50 reg char *s, *cmd, **argv, **p, *interp;
54 if(!(interp = getenv("SHELL")) || !interp[0])
55 interp = "/bin/sh";
57 if(strcmp(interp,"/bin/sh") != 0 && strcmp(interp,"/bin/ksh") != 0 )
58 { if(access(interp,X_OK) == 0)
60 else interp = "/bin/sh";
124 for(s = interp+strlen(interp)-1; s >= interp; --s)
127 execl(interp, s+1, "-c", argcmd, NIL(char*));