PATCH: VT_R4 marshalling

[Marcus Meissner]

Hi,

Ciao, Marcus

Changelog:
	Marshal VT_R4 (4 byte float) (fixes #1180).

Index: tmarshal.c
===================================================================
RCS file: /home/wine/wine/dlls/oleaut32/tmarshal.c,v
retrieving revision 1.9
diff -u -r1.9 tmarshal.c
--- tmarshal.c	12 Sep 2002 22:07:04 -0000	1.9
+++ tmarshal.c	5 Dec 2002 08:31:11 -0000
@@ -420,6 +420,7 @@
     case VT_UI4:
     case VT_UINT:
     case VT_I4:
+    case VT_R4:
     case VT_UI2:
     case VT_UI1:
 	hres = S_OK;
@@ -764,7 +765,7 @@
 	    }
 	}
         case VT_ERROR:
-	case VT_BOOL: case VT_I4: case VT_UI4: case VT_UINT:
+	case VT_BOOL: case VT_I4: case VT_UI4: case VT_UINT: case VT_R4:
         case VT_UI2:
 	case VT_UI1:
 	    if (readit) {