wine/dlls/oleaut32 variant.c

["John K. Hohm" <jhohm@acm.org>]

Changelog:
John K. Hohm <jhohm@acm.org>
Implemented SizeOfVariantData cases for VT_DISPATCH, VT_UNKNOWN, VT_CY.

Index: dlls/oleaut32/variant.c
===================================================================
RCS file: /home/wine/wine/dlls/oleaut32/variant.c,v
retrieving revision 1.38
diff -u -r1.38 variant.c
--- dlls/oleaut32/variant.c	31 May 2002 23:25:50 -0000	1.38
+++ dlls/oleaut32/variant.c	19 Jun 2002 00:26:52 -0000
@@ -520,12 +520,14 @@
         size = sizeof(VARIANT_BOOL);
         break;
     case( VT_BSTR ):
+    case( VT_DISPATCH ):
+    case( VT_UNKNOWN ):
         size = sizeof(void*);
         break;
     case( VT_CY ):
-    case( VT_DISPATCH ):
-    case( VT_UNKNOWN ):
-    case( VT_DECIMAL ):
+	size = sizeof(CY);
+	break;
+    case( VT_DECIMAL ):		/* hmm, tricky, DECIMAL is only VT_BYREF */
     default:
         FIXME("Add size information for type vt=%d\n", V_VT(parg) & VT_TYPEMASK );
         break;