From: Dave Mitchell Date: Wed, 4 Jul 2007 22:39:08 +0000 (+0000) Subject: really fix S_emulate_eaccess compiler warning (#31418 didn't) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=adec1d0e00f3b763cc05fa195d72216088cacd1f;p=p5sagit%2Fp5-mst-13.2.git really fix S_emulate_eaccess compiler warning (#31418 didn't) p4raw-id: //depot/perl@31536 --- diff --git a/embed.fnc b/embed.fnc index 14f5292..3568ba3 100644 --- a/embed.fnc +++ b/embed.fnc @@ -1352,8 +1352,8 @@ s |void |qsortsvu |NN SV** array|size_t num_elts|NN SVCOMPARE_t compare #if defined(PERL_IN_PP_SYS_C) || defined(PERL_DECL_PROT) s |OP* |doform |NN CV *cv|NN GV *gv|NN OP *retop # if !defined(PERL_EFF_ACCESS) && defined(HAS_ACCESS) && (defined(HAS_SETREUID) || defined(HAS_SETRESUID) || defined(HAS_SETREGID) || defined(HAS_SETRESGID)) -# endif s |int |emulate_eaccess|NN const char* path|Mode_t mode +# endif # if !defined(HAS_MKDIR) || !defined(HAS_RMDIR) sR |int |dooneliner |NN const char *cmd|NN const char *filename # endif