This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix change #28552: VC++ doesn't like code before declarations
authorSteve Hay <SteveHay@planit.com>
Wed, 12 Jul 2006 10:28:39 +0000 (10:28 +0000)
committerSteve Hay <SteveHay@planit.com>
Wed, 12 Jul 2006 10:28:39 +0000 (10:28 +0000)
p4raw-link: @28552 on //depot/perl: 91dba0be91f1c35e9474de79c0592c0c8d8379dc

p4raw-id: //depot/perl@28556

ext/Hash/Util/FieldHash/FieldHash.xs

index faddb96..44ff3ce 100644 (file)
@@ -21,11 +21,12 @@ START_MY_CXT
 HV* HUF_get_ob_reg(void) {
     dSP;
     HV* ob_reg = NULL;
+    I32 items;
     ENTER;
     SAVETMPS;
 
     PUSHMARK(SP);
-    I32 items = call_pv(HUF_OB_REG, G_SCALAR|G_NOARGS);
+    items = call_pv(HUF_OB_REG, G_SCALAR|G_NOARGS);
     SPAGAIN;
 
     if (items == 1 && TOPs && SvROK(TOPs) && SvTYPE(SvRV(TOPs)) == SVt_PVHV) {