From cbb8d9c3d4cdd1b786d8d41843fee4b1659d8c83 Mon Sep 17 00:00:00 2001
From: suke <suke@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 10 Feb 2007 00:05:42 +0000
Subject: * ext/win32ole/win32ole.c (ole_variant2val): fix compile error   on
 VC++.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@11687 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/win32ole/win32ole.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'ext')

diff --git a/ext/win32ole/win32ole.c b/ext/win32ole/win32ole.c
index f9064aaad..950ff21fd 100644
--- a/ext/win32ole/win32ole.c
+++ b/ext/win32ole/win32ole.c
@@ -921,12 +921,13 @@ ole_variant2val(pvar)
         VARIANT variant;
         VALUE val;
         VALUE val2;
+        int dim = 0;
 
         if (!psa) {
             return obj;
         }
+        dim = SafeArrayGetDim(psa);
 
-        int dim = SafeArrayGetDim(psa);
         VariantInit(&variant);
         V_VT(&variant) = (V_VT(pvar) & ~VT_ARRAY) | VT_BYREF;
 
-- 
cgit