exception tracking should work

This commit is contained in:
Araq 2012-11-04 18:09:15 +01:00
commit 6dd2c2d767
7 changed files with 105 additions and 18 deletions

View file

@ -5,11 +5,13 @@ discard """
type
Test = object of TObject
method doMethod(a: ref TObject) =
method doMethod(a: ref TObject) {.raises: [EIO].} =
quit "override"
method doMethod(a: ref Test) =
echo "hello"
if a == nil:
raise newException(EIO, "arg")
proc doProc(a: ref Test) =
echo "hello"