Kaydet (Commit) 4e00df4f authored tarafından Julien Nabet's avatar Julien Nabet Kaydeden (comit) Caolán McNamara

Related fdo#87834: add 2 unit tests

Change-Id: I4735b15c9535dc17665629510fdafe3dd4086e0b
Reviewed-on: https://gerrit.libreoffice.org/13708Reviewed-by: 's avatarCaolán McNamara <caolanm@redhat.com>
Tested-by: 's avatarCaolán McNamara <caolanm@redhat.com>
üst b7d02d7a
'
' 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/.
'
Function doUnitTest as Integer
If (Mid("abc", 5, -3) = "") Then
doUnitTest = 1
Else
doUnitTest = 0
End If
End Function
'
' 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/.
'
Function doUnitTest as Integer
If (Mid("abc", 5) = "") Then
doUnitTest = 1
Else
doUnitTest = 0
End If
End Function
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