Nikolay Sivov : ole2disp: Implement SafeArrayGetDim().

[Alexandre Julliard]

Module: wine
Branch: stable
Commit: c33584a711573b27a5895a17216d61f2946f00a9
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=c33584a711573b27a5895a1721...

Author: Nikolay Sivov 
Date:   Wed Jan 13 12:25:47 2016 +0300

ole2disp: Implement SafeArrayGetDim().

Signed-off-by: Nikolay Sivov 
Signed-off-by: Alexandre Julliard 
(cherry picked from commit 332dd07fad031a51f5d921d6d348f3345b9ae061)
Signed-off-by: Michael Stefaniuc

---

dlls/ole2disp.dll16/ole2disp.c          | 9 +++++++++
 dlls/ole2disp.dll16/ole2disp.dll16.spec | 2 +-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/dlls/ole2disp.dll16/ole2disp.c b/dlls/ole2disp.dll16/ole2disp.c
index 5831d86..0c033cd 100644
--- a/dlls/ole2disp.dll16/ole2disp.c
+++ b/dlls/ole2disp.dll16/ole2disp.c
@@ -90,6 +90,15 @@ static ULONG safearray_getcellcount(const SAFEARRAY16 *sa)
 }

/******************************************************************************
+ *    SafeArrayGetDim [OLE2DISP.17]
+ */
+USHORT WINAPI SafeArrayGetDim16(SAFEARRAY16 *sa)
+{
+    TRACE("(%p)\n", sa);
+    return sa->cDims;
+}
+
+/******************************************************************************
  *    SafeArrayAllocDescriptor [OLE2DISP.38]
  */
 HRESULT WINAPI SafeArrayAllocDescriptor16(UINT16 dims, SEGPTR *ret)
diff --git a/dlls/ole2disp.dll16/ole2disp.dll16.spec b/dlls/ole2disp.dll16/ole2disp.dll16.spec
index 919583d..1fd2b0b 100644
--- a/dlls/ole2disp.dll16/ole2disp.dll16.spec
+++ b/dlls/ole2disp.dll16/ole2disp.dll16.spec
@@ -14,7 +14,7 @@
 14 stub DOSDATETIMETOVARIANTTIME
 15 stub SAFEARRAYCREATE
 16 stub SAFEARRAYDESTROY
-17 stub SAFEARRAYGETDIM
+17 pascal -ret16 SafeArrayGetDim(ptr) SafeArrayGetDim16
 18 stub SAFEARRAYGETELEMSIZE
 19 stub SAFEARRAYGETUBOUND
 20 stub SAFEARRAYGETLBOUND