diff options
Diffstat (limited to 'basic/qa/basic_coverage/string_right_01.bas')
| -rw-r--r-- | basic/qa/basic_coverage/string_right_01.bas | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/basic/qa/basic_coverage/string_right_01.bas b/basic/qa/basic_coverage/string_right_01.bas deleted file mode 100644 index a291d0704bf3..000000000000 --- a/basic/qa/basic_coverage/string_right_01.bas +++ /dev/null @@ -1,26 +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/. -' - -Option Explicit - -Function doUnitTest as String - -Dim s1 As String -Dim s2 As String - - s1 = "abc" - - s2 = Right(s1, 2) - - If s2 = "bc" Then - doUnitTest = "OK" - Else - doUnitTest = "FAIL" - End If - -End Function |