diff options
| author | David Mitchell <davem@iabyn.com> | 2011-04-18 18:35:13 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2011-04-18 18:35:13 +0100 |
| commit | 3b0f6d32e15e74a4df6d5451b750a04a869d1d26 (patch) | |
| tree | f3952a408e4dbe6b33406c2d571fb14394c0e2df /pp.c | |
| parent | c2b7148f0bcb5bb5475b408a4e325287995b7d89 (diff) | |
| download | perl-3b0f6d32e15e74a4df6d5451b750a04a869d1d26.tar.gz | |
fix for pp.c under win32 etc
Commit d4fc4415aac96132fac5b1e43e73bcba33a41b79 added two definitions
of the DEREF_PLAIN_ARRAY array; the non-GCC one had syntax errors
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -5446,10 +5446,10 @@ S_deref_plain_array(pTHX_ AV *ary) #else # define DEREF_PLAIN_ARRAY(ary) \ ( \ - PL_Sv = (SV *)(ary); \ + PL_Sv = (SV *)(ary), \ SvTYPE(PL_Sv) == SVt_PVAV \ ? (AV *)PL_Sv \ - : S_deref_plain_array(aTHX_ (AV *)PL_Sv); \ + : S_deref_plain_array(aTHX_ (AV *)PL_Sv) \ ) #endif |