ole32: Fix sign expansion of codepage values.

Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Alexandre Julliard 2022-04-14 09:44:16 +02:00
parent d0b400c945
commit 1f71ea3106
1 changed files with 2 additions and 2 deletions
dlls/ole32

View File

@ -802,7 +802,7 @@ static HRESULT WINAPI IPropertyStorage_fnWriteMultiple(
if (dictionary_num_entries(This->propid_to_prop) == 0 && if (dictionary_num_entries(This->propid_to_prop) == 0 &&
rgpropvar[i].vt == VT_I2) rgpropvar[i].vt == VT_I2)
{ {
This->codePage = rgpropvar[i].iVal; This->codePage = (USHORT)rgpropvar[i].iVal;
if (This->codePage == CP_UNICODE) if (This->codePage == CP_UNICODE)
This->grfFlags &= ~PROPSETFLAG_ANSI; This->grfFlags &= ~PROPSETFLAG_ANSI;
else else
@ -1868,7 +1868,7 @@ static HRESULT PropertyStorage_ReadFromStream(PropertyStorage_impl *This)
{ {
case PID_CODEPAGE: case PID_CODEPAGE:
if (prop.vt == VT_I2) if (prop.vt == VT_I2)
This->codePage = (UINT)prop.iVal; This->codePage = (USHORT)prop.iVal;
break; break;
case PID_LOCALE: case PID_LOCALE:
if (prop.vt == VT_I4) if (prop.vt == VT_I4)