*a++ = SvPVx(*mark, n_a);
else
*a++ = "";
- *a = Nullch;
+ *a = NULL;
if (argv[0][0] != '/' && argv[0][0] != '\\'
&& !(argv[0][0] && argv[0][1] == ':'
return convretcode (system (cmd),cmd,execf);
}
- New (1303,PL_Argv,(s-cmd)/2+2,char*);
+ Newx (PL_Argv,(s-cmd)/2+2,char*);
PL_Cmd=savepvn (cmd,s-cmd);
a=PL_Argv;
for (s=PL_Cmd; *s;) {
if (*s)
*s++='\0';
}
- *a=Nullch;
+ *a=NULL;
if (!PL_Argv[0])
return -1;
}
bool
-Perl_do_exec (pTHX_ char *cmd)
+Perl_do_exec (pTHX_ const char *cmd)
{
do_spawn2 (aTHX_ cmd,EXECF_EXEC);
return FALSE;