niansa-misc/wine
1
0
Fork 0
mirror of synced 2025-03-07 03:53:26 +01:00
Code Issues Projects Releases Packages Wiki Activity

ole2disp: Implement SafeArrayLock()/SafeArrayUnlock().

Browse source 
Signed-off-by: Nikolay Sivov <nsivov@codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Nikolay Sivov 2016-01-13 22:25:56 +03:00 • committed by Alexandre Julliard
parent 26c9bd9f15
commit 2ef42bd946
2 changed files with 36 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

34
dlls/ole2disp.dll16/ole2disp.c
View file

@ -107,6 +107,40 @@ USHORT WINAPI SafeArrayGetElemsize16(SAFEARRAY16 *sa)
return sa->cbElements; return sa->cbElements;
} }
/******************************************************************************
* SafeArrayLock [OLE2DISP.21]
*/
HRESULT WINAPI SafeArrayLock16(SAFEARRAY16 *sa)
{
TRACE("(%p)\n", sa);
if (!sa)
return E_INVALIDARG16;
if (sa->cLocks == 0xffff)
return E_UNEXPECTED;
sa->cLocks++;
return S_OK;
}
/******************************************************************************
* SafeArrayUnlock [OLE2DISP.22]
*/
HRESULT WINAPI SafeArrayUnlock16(SAFEARRAY16 *sa)
{
TRACE("(%p)\n", sa);
if (!sa)
return E_INVALIDARG16;
if (sa->cLocks == 0)
return E_UNEXPECTED;
sa->cLocks--;
return S_OK;
}
/****************************************************************************** /******************************************************************************
* SafeArrayAllocDescriptor [OLE2DISP.38] * SafeArrayAllocDescriptor [OLE2DISP.38]
*/ */

4
dlls/ole2disp.dll16/ole2disp.dll16.spec
View file

@ -18,8 +18,8 @@
18 pascal -ret16 SafeArrayGetElemsize(ptr) SafeArrayGetElemsize16 18 pascal -ret16 SafeArrayGetElemsize(ptr) SafeArrayGetElemsize16
19 stub SAFEARRAYGETUBOUND 19 stub SAFEARRAYGETUBOUND
20 stub SAFEARRAYGETLBOUND 20 stub SAFEARRAYGETLBOUND
21 stub SAFEARRAYLOCK 21 pascal SafeArrayLock(ptr) SafeArrayLock16
22 stub SAFEARRAYUNLOCK 22 pascal SafeArrayUnlock(ptr) SafeArrayUnlock16
23 stub SAFEARRAYACCESSDATA 23 stub SAFEARRAYACCESSDATA
24 stub SAFEARRAYUNACCESSDATA 24 stub SAFEARRAYUNACCESSDATA
25 stub SAFEARRAYGETELEMENT 25 stub SAFEARRAYGETELEMENT