diff options
author | Andreas Heinisch <andreas.heinisch@yahoo.de> | 2019-11-25 15:14:53 +0100 |
---|---|---|
committer | Mike Kaganski <mike.kaganski@collabora.com> | 2019-11-28 10:21:25 +0100 |
commit | 4fdc90c51e6a1bbb83c1f1826ad5b90dc1ff0ad6 (patch) | |
tree | 17737dea4d38b97e6247d7d0c5daac270c04e55c /basic/qa | |
parent | fc34df00c47e97fa1a9633c1e14e8b9df52f77f5 (diff) |
tdf#97983 - Added localization for numeric types
For numeric types, take into consideration different locales
Change-Id: I815c195e7ef53a7b958f85932415a16c9a8a1e35
Reviewed-on: https://gerrit.libreoffice.org/83683
Tested-by: Jenkins
Reviewed-by: Mike Kaganski <mike.kaganski@collabora.com>
Diffstat (limited to 'basic/qa')
-rw-r--r-- | basic/qa/basic_coverage/test_types_conversion.vb | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/basic/qa/basic_coverage/test_types_conversion.vb b/basic/qa/basic_coverage/test_types_conversion.vb index 0de109bc984f..0868f4d3e50a 100644 --- a/basic/qa/basic_coverage/test_types_conversion.vb +++ b/basic/qa/basic_coverage/test_types_conversion.vb @@ -11,6 +11,7 @@ Dim nTotalCount As Integer Dim nPassCount As Integer Dim nFailCount As Integer +' For the following tests the en-US (English - United States) locale is required Function doUnitTest() As Integer nTotalCount = 0 nPassCount = 0 @@ -35,13 +36,13 @@ Function doUnitTest() As Integer ' Negative floating-point with leading and trailing spaces StartTest() - nVal = " -123.45 " - AssertTest(nVal = -123.45) + nVal = " -123.456 " + AssertTest(nVal = -123.456) - ' Wrong decimal separator + ' Wrong decimal separator (interpreted as group separator) StartTest() - nVal = " -123,45 " - AssertTest(nVal = -123) + nVal = " -123,456 " + AssertTest(nVal = -123456) If ((nFailCount > 0) Or (nPassCount <> nTotalCount)) Then doUnitTest = 0 |