Make LoadTypeLib stub return failure instead of success.

4f85ca44 · Francis Beaudet · Alexandre Julliard · 688c5658 · 4f85ca44
Commit 4f85ca44 authored Jan 23, 1999 by Francis Beaudet Committed by Alexandre Julliard Jan 23, 1999
Hide whitespace changes
Inline Side-by-side

Showing with 9 additions and 2 deletions

typelib.c ole/typelib.c +9 -2

No files found.
--- a/ole/typelib.c
+++ b/ole/typelib.c
@@ -108,6 +108,10 @@ HRESULT WINAPI LoadTypeLib16(
    void * *pptLib) /* [out] Pointer to pointer to loaded type library */
 {
    FIXME(ole, "('%s',%p): stub\n",debugstr_w((LPWSTR)szFile),pptLib);
+
+    if (pptLib!=0)
+      *pptLib=0;
+
    return E_FAIL;
 }

@@ -127,8 +131,11 @@ HRESULT WINAPI LoadTypeLib32(
    void * *pptLib) /* [out] Pointer to pointer to loaded type library */
 {
    FIXME(ole, "('%s',%p): stub\n",debugstr_w(szFile),pptLib);
-    (long *)pptLib=0x123;
-    return S_OK;           /* fixme: pretend everything is OK*/
+
+    if (pptLib!=0)
+      *pptLib=0;
+
+    return E_FAIL;
 }

 /******************************************************************************