From: Gerard Goossen <gerard@ggoossen.net>
Date: Thu, 12 Nov 2009 13:36:30 +0000 (+0100)
Subject: Add missing LEAVE to POSIX.xs sigaction
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6ca4bbc9a415cdf2e94ea02c48bc7d0fb5c1b2df;p=p5sagit%2Fp5-mst-13.2.git

Add missing LEAVE to POSIX.xs sigaction
---

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 5b7ade6..d30a752 100644
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -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;