6f4c24c3e1
[GB.TEST] * NEW: Assert.IntendedFailure move to Test.IntendedFailure * NEW: TAllAsserts tests all assertions (3 todo left)
27 lines
No EOL
520 B
Text
27 lines
No EOL
520 B
Text
' 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 |