From 6dd2c2d7670b11aa2155f41e1309dad011456140 Mon Sep 17 00:00:00 2001
From: Araq <rumpf_a@web.de>
Date: Sun, 4 Nov 2012 18:09:15 +0100
Subject: exception tracking should work

---
 tests/run/tmultim4.nim | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'tests/run')

diff --git a/tests/run/tmultim4.nim b/tests/run/tmultim4.nim
index 6bb7970dd..d824086b2 100755
--- a/tests/run/tmultim4.nim
+++ b/tests/run/tmultim4.nim
@@ -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"
-- 
cgit 1.4.1-2-gfad0