From: H.Merijn Brand <h.m.brand@xs4all.nl>
Date: Wed, 2 Feb 2005 12:49:46 +0000 (+0000)
Subject: Picky compilers (e.g. vac on AIX 5.2) do not accept statements
X-Git-Tag: v5.10.0~7174
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/f8952f9c0d30f65af1114a6384b97ad7770dce81?hp=b2de6a21dcc23a8be547019830dfeac642d34c3f

Picky compilers (e.g. vac on AIX 5.2) do not accept statements
between declarations

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

diff --git a/ext/Devel/PPPort/PPPort.xs b/ext/Devel/PPPort/PPPort.xs
index ed3c379..e0bfb31 100644
--- a/ext/Devel/PPPort/PPPort.xs
+++ b/ext/Devel/PPPort/PPPort.xs
@@ -102,8 +102,9 @@ XS(XS_Devel__PPPort_dXSTARG)
 {
   dXSARGS;
   dXSTARG;
+  IV iv;
   SP -= items;
-  IV iv = SvIV(ST(0)) + 1;
+  iv = SvIV(ST(0)) + 1;
   PUSHi(iv);
   XSRETURN(1);
 }