Initial implementation of CreateTypeLib2() and the ICreateTypeLib2 and

ICreateTypeInfo2 interfaces.

dlls/oleaut32/Makefile.in

@@ -24,6 +24,7 @@ C_SRCS = \
 	stubs.c \
 	tmarshal.c \
 	typelib.c \
+	typelib2.c \
 	usrmarshal.c \
 	varformat.c \
 	variant.c \

dlls/oleaut32/oleaut32.spec

@@ -175,7 +175,7 @@
 177 stdcall VarDecAdd(ptr ptr ptr)
 178 stdcall VarDecDiv(ptr ptr ptr)
 179 stdcall VarDecMul(ptr ptr ptr)
-180 stub CreateTypeLib2
+180 stdcall CreateTypeLib2(long wstr ptr)
 181 stdcall VarDecSub(ptr ptr ptr)
 182 stdcall VarDecAbs(ptr ptr)
 183 stdcall LoadTypeLibEx (wstr long ptr)

dlls/oleaut32/typelib.h

@@ -269,7 +269,9 @@ typedef struct {
                            sometimes 0 (interface, func) */
     INT   unk10;        /* sometimes -1 (lib) , sometimes 0 (interface, func),
                            sometimes 0x10 (par) */
-    INT   namelen;      /* only lower 8 bits are valid */
+    INT   namelen;      /* only lower 8 bits are valid,
+			   lower-middle 8 bits are unknown (flags?),
+			   upper 16 bits are hash code */
 } MSFT_NameIntro;
 /* the custom data table directory has enties like this */
 typedef struct {