From: Andy Dougherty <doughera@lafayette.edu>
Date: Thu, 25 Apr 2002 17:01:08 +0000 (-0400)
Subject: Re: POSIX::WEXITSTATUS broken again
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0be3c52e1fefcbd9964c607508ddbadc841096ae;p=p5sagit%2Fp5-mst-13.2.git

Re: POSIX::WEXITSTATUS broken again
   Message-Id: <Pine.SOL.4.10.10204251656510.2019-100000@maxwell.phys.lafayette.edu>

p4raw-id: //depot/perl@16168
---

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 2d1abf3..bc0031e 100644
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -517,7 +517,7 @@ __END__
       if (memEQ(name, "WEXITSTATUS", 11)) {
       /*                ^                */
 #ifdef WEXITSTATUS
-        *arg_result = WEXITSTATUS(WMUNGE(*arg_result));
+        *arg_result = WEXITSTATUS(WMUNGE((int) *arg_result));
         return PERL_constant_ISIV;
 #else
         return PERL_constant_NOTDEF;