summaryrefslogtreecommitdiff
path: root/basic/qa
diff options
context:
space:
mode:
authorU-DESKTOP-8OSNV7R\DrRobotto <andreas.heinisch@yahoo.de>2019-12-24 12:22:34 +0100
committerMike Kaganski <mike.kaganski@collabora.com>2020-01-05 21:42:27 +0100
commit0b4f8bf571baf2ccd5a8aafdc4deb41867420be3 (patch)
tree5f5af8179e6180f118000df70f49e9783bf66c98 /basic/qa
parent5fbc89478eb91d9b97f0c3d65d9946a5cec31ea3 (diff)
tdf#129596 Distinguish between integer and long while loading immediate values
During the generation of CONST_ expressions, distinguish between integer and long and load the correct value in the immediate load step. Change-Id: Ib4eb65d7fae3163043899ad8234816b1ebd7316b Reviewed-on: https://gerrit.libreoffice.org/c/core/+/85779 Tested-by: Jenkins Reviewed-by: Mike Kaganski <mike.kaganski@collabora.com>
Diffstat (limited to 'basic/qa')
-rw-r--r--basic/qa/vba_tests/typename.vb6
1 files changed, 6 insertions, 0 deletions
diff --git a/basic/qa/vba_tests/typename.vb b/basic/qa/vba_tests/typename.vb
index 4ec2f3e31063..7e49a4d61cdc 100644
--- a/basic/qa/vba_tests/typename.vb
+++ b/basic/qa/vba_tests/typename.vb
@@ -61,6 +61,12 @@ Function verify_testTypeName() As String
date1 = TypeName(l1)
TestLog_ASSERT date1 = date2, "the return TypeName is: " & date1
+ ' tdf#129596 - Types of constant values
+ TestLog_ASSERT TypeName(32767) = "Integer", "the return TypeName(32767) is: " & TypeName(32767)
+ TestLog_ASSERT TypeName(-32767) = "Integer", "the return TypeName(-32767) is: " & TypeName(-32767)
+ TestLog_ASSERT TypeName(1048575) = "Long", "the return TypeName(1048575) is: " & TypeName(1048575)
+ TestLog_ASSERT TypeName(-1048575) = "Long", "the return TypeName(-1048575) is: " & TypeName(-1048575)
+
result = result & Chr$(10) & "Tests passed: " & passCount & Chr$(10) & "Tests failed: " & failCount & Chr$(10)
verify_testTypeName = result