diff options
Diffstat (limited to 'basic/qa/basic_coverage/test_iserror_method.vb')
-rw-r--r-- | basic/qa/basic_coverage/test_iserror_method.vb | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/basic/qa/basic_coverage/test_iserror_method.vb b/basic/qa/basic_coverage/test_iserror_method.vb deleted file mode 100644 index fb12abe6a257..000000000000 --- a/basic/qa/basic_coverage/test_iserror_method.vb +++ /dev/null @@ -1,22 +0,0 @@ -' -' This file is part of the LibreOffice project. -' -' This Source Code Form is subject to the terms of the Mozilla Public -' License, v. 2.0. If a copy of the MPL was not distributed with this -' file, You can obtain one at http://mozilla.org/MPL/2.0/. -' - -Type MyType - tName as String -End Type - -Function doUnitTest as Integer - dim aVariant as MyType - aVariant.tName = "A string" - ' ISERROR - If ( IsError( aVariant ) ) Then - doUnitTest = 0 - Else - doUnitTest = 1 - End If -End Function |