From: Edward O'Callaghan edward@antitrust.cc
Partial, as per documentation, implement fixing as the default locale.
Signed-off-by: Edward O'Callaghan edward@antitrust.cc --- dlls/oleaut32/oleaut32.spec | 4 ++-- dlls/oleaut32/vartype.c | 35 +++++++++++++++++++++++++++++++++++ 2 files changed, 37 insertions(+), 2 deletions(-)
diff --git a/dlls/oleaut32/oleaut32.spec b/dlls/oleaut32/oleaut32.spec index 21b52f1f06e..25d126fb1a3 100644 --- a/dlls/oleaut32/oleaut32.spec +++ b/dlls/oleaut32/oleaut32.spec @@ -313,8 +313,8 @@ 319 stdcall VarDateFromUdateEx(ptr long long ptr) 322 stdcall GetRecordInfoFromGuids(ptr long long long ptr ptr) 323 stdcall GetRecordInfoFromTypeInfo(ptr ptr) -325 stub SetVarConversionLocaleSetting -326 stub GetVarConversionLocaleSetting +325 stdcall SetVarConversionLocaleSetting(long) +326 stdcall GetVarConversionLocaleSetting(ptr) 327 stdcall SetOaNoCache() 329 stdcall VarCyMulI8(int64 int64 ptr) 330 stdcall VarDateFromUdate(ptr long ptr) diff --git a/dlls/oleaut32/vartype.c b/dlls/oleaut32/vartype.c index 747705f94e2..fec278bd49d 100644 --- a/dlls/oleaut32/vartype.c +++ b/dlls/oleaut32/vartype.c @@ -4050,6 +4050,41 @@ HRESULT WINAPI VarCyCmpR8(CY cyLeft, double dblRight) return hRet; }
+/************************************************************************ + * SetVarConversionLocaleSetting (OLEAUT32.325) + * + * Sets Automation specific National Language Support (NLS) flags. + * + * PARAMS + * dwFlags [I] Flag + * + * RETURNS + * Success: S_OK. + */ +HRESULT SetVarConversionLocaleSetting(/* in */ ULONG dwFlags) +{ + FIXME("%d, partial stub!\n", dwFlags); + return S_OK; +} + +/************************************************************************ + * GetVarConversionLocaleSetting (OLEAUT32.326) + * + * Gets Automation specific National Language Support (NLS) flags. + * + * PARAMS + * dwFlags [O] Flag + * + * RETURNS + * Success: S_OK. + */ +HRESULT GetVarConversionLocaleSetting(/* out */ ULONG *dwFlags) +{ + FIXME("partial stub!\n"); + if (dwFlags) *dwFlags = 0; + return S_OK; +} + /************************************************************************ * VarCyMulI8 (OLEAUT32.329) *