From: Vincent Pit <perl@profvince.com>
Date: Mon, 9 Nov 2015 12:49:14 +0000 (-0200)
Subject: Fix a declaration-after-code error
X-Git-Tag: v0.15~3
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=commitdiff_plain;h=403b8b4a1f84772b9f78b25ada4c4e5889a47334

Fix a declaration-after-code error
---

diff --git a/Types.xs b/Types.xs
index 7629733..d655c85 100644
--- a/Types.xs
+++ b/Types.xs
@@ -316,9 +316,9 @@ static OP *lt_pp_padrange(pTHX) {
   count = PL_op->op_private & OPpPADRANGE_COUNTMASK;
 
   for (i = 0, p = roi.padxv_start; i < count && p; ++i, p = p->op_next) {
+   lt_op_padxv_info oi;
    while (p->op_type == OP_NULL)
     p = p->op_next;
-   lt_op_padxv_info oi;
    if (p->op_type == OP_PADSV && lt_padxv_map_fetch(p, &oi))
     lt_op_padxv_info_call(&oi, PAD_SV(base + i));
   }