gambas-source-code/main/lib/test/gb.test/.src/TestMyself/TElse.test

27 lines
520 B
Text
Raw Normal View History

' Gambas test file
Public Sub NoMessage()
'There is no message whicht
Assert.Ok(True)
End
Public Sub NoMessageInbetween()
Assert.Ok(True, "TestNoMessageInbetween Assert 1 description defined")
Assert.Ok(True)
Assert.Ok(True, "Assert 3 description defined")
Assert.Ok(True)
End
Public Sub Note()
Test.Note("This\nis\na\nnote")
Test.Plan(0)
Test.Note("The next note is Null and that's alright:")
Test.Note(Null)
Test.SkipAll("This doesn't actually assert anything")
End