#include #include #include "unix.h" extern char ** cstringvect(); value unix_execvp(path, args) /* ML */ value path, args; { char ** argv; argv = cstringvect(args); (void) execvp(String_val(path), argv); stat_free((char *) argv); uerror("execvp", path); return Val_unit; /* never reached, but suppress warnings */ /* from smart compilers */ }