Nikolay Sivov : ole2disp: Implement SafeArrayGetDim().

[Alexandre Julliard]

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

Author: Nikolay Sivov <nsivov at codeweavers.com>
Date:   Wed Jan 13 12:25:47 2016 +0300

ole2disp: Implement SafeArrayGetDim().

Signed-off-by: Nikolay Sivov <nsivov at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>
(cherry picked from commit 332dd07fad031a51f5d921d6d348f3345b9ae061)
Signed-off-by: Michael Stefaniuc <mstefani at winehq.org>

---

 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