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.
13 lines
227 B
Text
13 lines
227 B
Text
' Gambas test file
|
|
|
|
Public Sub TestError()
|
|
|
|
Dim a As Long
|
|
|
|
Try a = 3 / 0
|
|
Assert.Error("Wanted error. Ok if ok.")
|
|
|
|
Try a = 3 / 0 ' Throws Error.Code 26
|
|
Assert.ErrorCode(26, "Wanted error 26. Ok if ok.")
|
|
|
|
End
|