ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Keep "trailing" zeros on whole number part of a decimal. 

Add an example of this to tests.
This commit is contained in:
Walt Ogburn 2004-10-19 21:08:40 +00:00 committed by Alexandre Julliard
parent f5c25e8067
commit 84c1f667ae
2 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
dlls/oleaut32/tests/vartest.c
View File

@ -1048,6 +1048,12 @@ static void test_VarParseNumFromStr(void)
CONVERT("-0.51", NUMPRS_STD);
EXPECT(2,NUMPRS_STD,NUMPRS_NEG|NUMPRS_DECIMAL|NUMPRS_LEADING_MINUS,5,0,-2);
EXPECT2(5,1);
/* Keep trailing zeros on whole number part of a decimal */
CONVERT("40.1", NUMPRS_STD);
EXPECT(3,NUMPRS_STD,NUMPRS_DECIMAL,4,0,-1);
EXPECT2(4,0);
EXPECTRGB(2,1);
}
static HRESULT (WINAPI *pVarNumFromParseNum)(NUMPARSE*,BYTE*,ULONG,VARIANT*);

7
dlls/oleaut32/variant.c
View File

@ -1735,13 +1735,6 @@ HRESULT WINAPI VarParseNumFromStr(OLECHAR *lpszStr, LCID lcid, ULONG dwFlags,
pNumprs->dwOutFlags |= NUMPRS_DECIMAL;
cchUsed++;
/* Remove trailing zeros from the whole number part */
while (pNumprs->cDig > 1 && !rgbTmp[pNumprs->cDig - 1])
{
pNumprs->nPwr10++;
pNumprs->cDig--;
}
/* If we have no digits so far, skip leading zeros */
if (!pNumprs->cDig)
{