diff options
| author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-02-02 12:49:46 +0000 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-02-02 12:49:46 +0000 |
| commit | f8952f9c0d30f65af1114a6384b97ad7770dce81 (patch) | |
| tree | c6c0407b0b507e3a9bcf9d3b8c33a12fd28a55e5 | |
| parent | b2de6a21dcc23a8be547019830dfeac642d34c3f (diff) | |
| download | perl-f8952f9c0d30f65af1114a6384b97ad7770dce81.tar.gz | |
Picky compilers (e.g. vac on AIX 5.2) do not accept statements
between declarations
p4raw-id: //depot/perl@23919
| -rw-r--r-- | ext/Devel/PPPort/PPPort.xs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/Devel/PPPort/PPPort.xs b/ext/Devel/PPPort/PPPort.xs index ed3c379ea6..e0bfb31e15 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); } |