6f4c24c3e1
[GB.TEST] * NEW: Assert.IntendedFailure move to Test.IntendedFailure * NEW: TAllAsserts tests all assertions (3 todo left)
23 lines
417 B
Text
23 lines
417 B
Text
' Gambas module file
|
|
|
|
' Playground for development ...
|
|
|
|
|
|
Public Sub Main()
|
|
|
|
' ------------------------------------------------- Interpreter Interface
|
|
|
|
Dim Ass As Class
|
|
Dim name As String
|
|
Dim Symbols As String[]
|
|
|
|
Ass = Class.Load("Assert")
|
|
|
|
Symbols = Ass.Symbols
|
|
Symbols.Sort
|
|
|
|
For Each Name In Symbols
|
|
Print "Public Sub " & Name & "()" & gb.lf & "End"
|
|
Next
|
|
|
|
End
|