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.
31 lines
917 B
Text
31 lines
917 B
Text
' Gambas class file
|
|
|
|
''' This class represents an "ok" or "not ok" line in TAP.
|
|
''' It is generated by TapPrinter and TapParser.
|
|
|
|
Export
|
|
|
|
'' Possible values for the Directive field
|
|
Public Enum NONE = 0, TODO = 1, SKIP
|
|
|
|
'' The serial number of this test.
|
|
Public Id As Long = 0
|
|
'' Whether "ok" or "not ok" was printed.
|
|
Public Ok As Boolean = False
|
|
'' The test description.
|
|
Public Description As String = Null
|
|
'' The TAP directive constant NONE, TODO or SKIP.
|
|
Public Directive As Integer = NONE
|
|
'' The comment after the test description and directive, if any.
|
|
Public Comment As String = Null
|
|
'' If this is a subtest summary assertion, here are the child assertions.
|
|
Public Subtests As New TestAssertion[]
|
|
|
|
'' Whether the test counts as succeeded. A "not ok" test can succeed if it was marked as TODO.
|
|
Property Read Success As Boolean
|
|
|
|
Private Function Success_Read() As Boolean
|
|
|
|
Return Ok Or (Directive = TODO)
|
|
|
|
End
|