Put return value of LocalAlloc in CX too.

This commit is contained in:
Richard A Lough 1999-01-01 19:51:25 +00:00 committed by Alexandre Julliard
parent 3c77035a72
commit 13cec5ebfa
2 changed files with 14 additions and 1 deletions

View File

@ -9,7 +9,7 @@ file krnl386.exe
2 stub ExitKernel
3 pascal GetVersion() GetVersion16
4 pascal16 LocalInit(word word word) LocalInit
5 pascal16 LocalAlloc(word word) LocalAlloc16
5 register LocalAlloc(word word) WIN16_LocalAlloc
6 pascal16 LocalReAlloc(word word word) LocalReAlloc16
7 pascal16 LocalFree(word) LocalFree16
8 pascal LocalLock(word) LocalLock16

View File

@ -1521,6 +1521,19 @@ HLOCAL16 WINAPI LocalAlloc16( UINT16 flags, WORD size )
}
/***********************************************************************
* WIN16_LocalAlloc
*/
void WINAPI WIN16_LocalAlloc( CONTEXT *context )
{
WORD *stack = PTR_SEG_OFF_TO_LIN(SS_reg(context), SP_reg(context));
UINT16 flags = (UINT16)stack[3];
WORD size = (WORD)stack[2];
TRACE(local,"WIN16LocalAlloc: %04x %d \n", flags, size);
AX_reg(context) = CX_reg(context) = LOCAL_Alloc( DS_reg(context), flags, size );
}
/***********************************************************************
* LocalReAlloc16 (KERNEL.6)
*/