* ext/win32ole/win32ole.c (ole_variant2val): VC++6 does not

support VT_I8, VT_UI8.



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11741 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
suke 2007-02-14 13:57:59 +00:00
parent bee3de05ad
commit fdf4aa982f
2 changed files with 9 additions and 14 deletions

View File

@ -1,3 +1,8 @@
Wed Feb 14 22:52:43 2007 Masaki Suketa <masaki.suketa@nifty.ne.jp>
* ext/win32ole/win32ole.c (ole_variant2val): VC++6 does not
support VT_I8, VT_UI8.
Wed Feb 14 22:10:21 2007 Koichi Sasada <ko1@atdot.net>
* configure.in: change stack limit to 2MB from 32MB.

View File

@ -80,7 +80,7 @@
#define WC2VSTR(x) ole_wc2vstr((x), TRUE)
#define WIN32OLE_VERSION "0.9.6"
#define WIN32OLE_VERSION "0.9.7"
typedef HRESULT (STDAPICALLTYPE FNCOCREATEINSTANCEEX)
(REFCLSID, IUnknown*, DWORD, COSERVERINFO*, DWORD, MULTI_QI*);
@ -1611,32 +1611,22 @@ ole_variant2val(VARIANT *pvar)
else
obj = INT2NUM((long)V_I4(pvar));
break;
#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)
case VT_I8:
/*
if(V_ISBYREF(pvar))
obj = INT2NUM(*V_I8REF(pvar));
else
obj = INT2NUM(V_I8(pvar));
*/
#ifdef HAVE_LONG_LONG
obj = LL2NUM(V_I8(pvar));
#else
obj = INT2NUM(V_I8(pvar));
#endif
#endif
break;
case VT_UI8:
/*
if(V_ISBYREF(pvar))
obj = INT2NUM(*V_UI8REF(pvar));
else
obj = INT2NUM(V_UI8(pvar));
*/
#ifdef HAVE_LONG_LONG
obj = ULL2NUM(V_UI8(pvar));
#else
obj = UINT2NUM(V_UI8(pvar));
#endif
break;
#endif /* (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__) */
case VT_R4:
if(V_ISBYREF(pvar))
obj = rb_float_new(*V_R4REF(pvar));