Kaydet (Commit) fbf8ae82 authored tarafından Noel Power's avatar Noel Power

fix for fdo#62323 fix duplicated and wrong tests

Change-Id: I73dc238f7de59367a0a9d00e5421ea6675b4f556
üst 4c9a08e7
...@@ -9,8 +9,8 @@ ...@@ -9,8 +9,8 @@
Function doUnitTest as Integer Function doUnitTest as Integer
Dim lngDecimal as Long Dim lngDecimal as Long
lngDecimal = Clng(&HFFFFFFFF) lngDecimal = Clng(&H80000000)
If lngDecimal = -1 Then If lngDecimal = -2147483648 Then
doUnitTest = 1 doUnitTest = 1
Else Else
doUnitTest = 0 doUnitTest = 0
......
...@@ -9,8 +9,8 @@ ...@@ -9,8 +9,8 @@
Function doUnitTest as Integer Function doUnitTest as Integer
Dim lngDecimal as Long Dim lngDecimal as Long
lngDecimal = Clng(&H80000000) lngDecimal = Clng(&H7FFFFFFF)
If lngDecimal = -2147483648 Then If lngDecimal = 2147483647 Then
doUnitTest = 1 doUnitTest = 1
Else Else
doUnitTest = 0 doUnitTest = 0
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment