[PATCH 6/6] combase: Move CoUnmarshalHresult().

[Nikolay Sivov]

Signed-off-by: Nikolay Sivov <nsivov at codeweavers.com>
---
 dlls/combase/combase.spec |  2 +-
 dlls/combase/marshal.c    |  8 ++++++++
 dlls/ole32/marshal.c      | 21 ---------------------
 dlls/ole32/ole32.spec     |  2 +-
 4 files changed, 10 insertions(+), 23 deletions(-)

diff --git a/dlls/combase/combase.spec b/dlls/combase/combase.spec
index f67d6f25e63..56dc63c4f72 100644
--- a/dlls/combase/combase.spec
+++ b/dlls/combase/combase.spec
@@ -164,7 +164,7 @@
 @ stub CoTestCancel
 @ stdcall CoUninitialize() ole32.CoUninitialize
 @ stub CoUnloadingWOW
-@ stdcall CoUnmarshalHresult(ptr ptr) ole32.CoUnmarshalHresult
+@ stdcall CoUnmarshalHresult(ptr ptr)
 @ stdcall CoUnmarshalInterface(ptr ptr ptr) ole32.CoUnmarshalInterface
 @ stub CoVrfCheckThreadState
 @ stub CoVrfGetThreadState
diff --git a/dlls/combase/marshal.c b/dlls/combase/marshal.c
index b68efe8c951..dfe6426db9a 100644
--- a/dlls/combase/marshal.c
+++ b/dlls/combase/marshal.c
@@ -28,3 +28,11 @@ HRESULT WINAPI CoMarshalHresult(IStream *stream, HRESULT hresult)
 {
     return IStream_Write(stream, &hresult, sizeof(hresult), NULL);
 }
+
+/***********************************************************************
+ *            CoUnmarshalHresult      (combase.@)
+ */
+HRESULT WINAPI CoUnmarshalHresult(IStream *stream, HRESULT *phresult)
+{
+    return IStream_Read(stream, phresult, sizeof(*phresult), NULL);
+}
diff --git a/dlls/ole32/marshal.c b/dlls/ole32/marshal.c
index d79e86dec28..90d24805952 100644
--- a/dlls/ole32/marshal.c
+++ b/dlls/ole32/marshal.c
@@ -2207,24 +2207,3 @@ HRESULT MARSHAL_GetStandardMarshalCF(LPVOID *ppv)
     *ppv = &StdMarshalCF;
     return S_OK;
 }
-
-/***********************************************************************
- *		CoUnmarshalHresult	[OLE32.@]
- *
- * Unmarshals an HRESULT value from a stream.
- *
- * PARAMS
- *  pStm     [I] Stream that hresult will be unmarshalled from.
- *  phresult [I] Pointer to HRESULT where the value will be unmarshalled to.
- *
- * RETURNS
- *  Success: S_OK
- *  Failure: A COM error code
- *
- * SEE ALSO
- *  CoMarshalHresult().
- */
-HRESULT WINAPI CoUnmarshalHresult(LPSTREAM pStm, HRESULT * phresult)
-{
-    return IStream_Read(pStm, phresult, sizeof(*phresult), NULL);
-}
diff --git a/dlls/ole32/ole32.spec b/dlls/ole32/ole32.spec
index 85ea6dcc8c9..001e7b7ad2b 100644
--- a/dlls/ole32/ole32.spec
+++ b/dlls/ole32/ole32.spec
@@ -89,7 +89,7 @@
 @ stdcall CoTreatAsClass(ptr ptr)
 @ stdcall CoUninitialize()
 @ stub CoUnloadingWOW
-@ stdcall CoUnmarshalHresult(ptr ptr)
+@ stdcall CoUnmarshalHresult(ptr ptr) combase.CoUnmarshalHresult
 @ stdcall CoUnmarshalInterface(ptr ptr ptr)
 @ stdcall CoWaitForMultipleHandles(long long long ptr ptr)
 @ stdcall CreateAntiMoniker(ptr)
-- 
2.28.0