5004f20609
[INTERPRETER] * NEW: Remove the now useless testing specific code. * NEW: 'gbx3 -T' now just loads the 'gb.test' component and calls Test.Main() passing it the '-T' option argument. [GB.TEST] * NEW: Move 'gb.test' sources in '/main/lib'. * NEW: 'gb.test' has now a part written in C that allows him to load project classes on demand.
37 lines
582 B
Text
37 lines
582 B
Text
' Gambas test file
|
|
|
|
''' This test can be executed to test a summary. Will fail.
|
|
|
|
'' Will succeed
|
|
Public Sub DoSomeAsserts()
|
|
|
|
Assert.Pass("Bla 1")
|
|
Assert.Pass("Bla 2")
|
|
Assert.Pass("Bla 3")
|
|
|
|
End
|
|
|
|
'' Will succeed
|
|
Public Sub DoSkip()
|
|
|
|
Assert.Skip("Report that a test is skipped.")
|
|
|
|
End
|
|
|
|
'' Will succeed
|
|
Public Sub DoTodo()
|
|
|
|
Assert.Todo("Because not ok yet.")
|
|
Assert.Ok(False, "Must be ok.")
|
|
|
|
Assert.Todo("This Todo seems not to be removed yet.")
|
|
Assert.Ok(True, "Must be ok.")
|
|
|
|
End
|
|
|
|
'' Will fail
|
|
Public Sub DoOneFailure()
|
|
|
|
Assert.Ok(False, "Intentional failure")
|
|
|
|
End
|