X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FPOSIX%2FPOSIX.xs;h=7bdd6339b7a057806236b1c12c37eb4bf425075f;hb=fabb67aac748c1bf94bbc4a173a67dbd9a00b4df;hp=5b7ade69ce21f163b1e1d1310c67351d119c4483;hpb=2489f03d17f65312c4370377c30587ab801b844f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 5b7ade6..7bdd633 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -887,8 +887,8 @@ WEXITSTATUS(status) POSIX::WSTOPSIG = 4 POSIX::WTERMSIG = 5 CODE: -#if !(defined(WEXITSTATUS) || defined(WIFEXITED) || defined(WIFSIGNALED) \ - || defined(WIFSTOPPED) || defined(WSTOPSIG) || defined (WTERMSIG)) +#if !defined(WEXITSTATUS) || !defined(WIFEXITED) || !defined(WIFSIGNALED) \ + || !defined(WIFSTOPPED) || !defined(WSTOPSIG) || !defined(WTERMSIG) RETVAL = 0; /* Silence compilers that notice this, but don't realise that not_here() can't return. */ #endif @@ -1421,8 +1421,10 @@ sigaction(sig, optaction, oldaction = 0) sv_setpvs(*svp, "DEFAULT"); } RETVAL = sigaction(sig, (struct sigaction *)0, & oact); - if(RETVAL == -1) + if(RETVAL == -1) { + LEAVE; XSRETURN_UNDEF; + } /* Get back the mask. */ svp = hv_fetchs(oldaction, "MASK", TRUE); if (sv_isa(*svp, "POSIX::SigSet")) { @@ -1502,8 +1504,10 @@ sigaction(sig, optaction, oldaction = 0) * essentially meaningless anyway. */ RETVAL = sigaction(sig, & act, (struct sigaction *)0); - if(RETVAL == -1) + if(RETVAL == -1) { + LEAVE; XSRETURN_UNDEF; + } } LEAVE;