' ' 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 VBASupport 1 Option Explicit Function doUnitTest() As String TestUtil.TestInit verify_testCHR doUnitTest = TestUtil.GetResult() End Function Sub verify_testCHR() On Error GoTo errorHandler TestUtil.AssertEqual(Chr(87), "W", "Chr(87)") TestUtil.AssertEqual(Chr(105), "i", "Chr(105)") TestUtil.AssertEqual(Chr(35), "#", "Chr(35)") ' tdf#145693 - argument name should be 'charcode' instead of 'string' TestUtil.AssertEqual(Chr(charcode:=35), "#", "Chr(charcode:=35)") Exit Sub errorHandler: TestUtil.ReportErrorHandler("verify_testCHR", Err, Error$, Erl) End Sub > LibreOffice 核心代码仓库文档基金会
summaryrefslogtreecommitdiff
path: root/vcl/vcl.common.component
diff options
context:
space:
mode:
authorStephan Bergmann <sbergman@redhat.com>2018-03-12 18:18:10 +0100
committerStephan Bergmann <sbergman@redhat.com>2018-03-14 08:50:28 +0100
commit76850fcd99d7a9f62c7a95e22bf83e814e07af7a (patch)
tree9f88b1299e9fd9a7b3619007847cec4dee96c313 /vcl/vcl.common.component
parent0fe96112bef31bdfc4f85db78aa4c4f2d1bf1d43 (diff)
prefix is unused when all implementations have constructors
Change-Id: I5d2efaa16932c0014cfb7491136b5d37f3e6dded Reviewed-on: https://gerrit.libreoffice.org/51160 Tested-by: Jenkins <ci@libreoffice.org> Reviewed-by: Stephan Bergmann <sbergman@redhat.com>