550c56b596
[GB.TEST]
* BUG: Fix plan that counted all testmethods in a container even if just one was called
34 lines
700 B
Text
34 lines
700 B
Text
' Gambas module file
|
|
|
|
Public Sub Main()
|
|
|
|
' These must succeed:
|
|
|
|
' UnitTest.Main("TestAllAsserts", Null, True)
|
|
' UnitTest.Main("TestSetup", Null, True)
|
|
' UnitTest.Main("TestElse", Null, True)
|
|
' UnitTest.Main("TestError", Null, True)
|
|
' UnitTest.Main("TestSetupTeardown", Null, True)
|
|
|
|
' Here every test must fail:
|
|
' UnitTest.Main("TestFailures", Null, True)
|
|
' UnitTest.Main("TestBailout", Null, True)
|
|
|
|
'Test all
|
|
'UnitTest.Main(Null, Null, True)
|
|
|
|
' Just one test
|
|
UnitTest.Main("TestAllAsserts", "TestAssert", True)
|
|
|
|
'Cheese()
|
|
|
|
End
|
|
|
|
' Private Sub Cheese()
|
|
'
|
|
' Dim UT As New UnitTest
|
|
'
|
|
' Print UT.AllTestContainers.Join(", ")
|
|
'
|
|
' End
|
|
|