From 20b5f31c03fb556ec0aa2428a40adbac004d8987 Mon Sep 17 00:00:00 2001 From: Araq Date: Mon, 13 Jan 2014 02:10:03 +0100 Subject: new tester; all tests categorized --- tests/run/tonraise.nim | 34 ---------------------------------- 1 file changed, 34 deletions(-) delete mode 100644 tests/run/tonraise.nim (limited to 'tests/run/tonraise.nim') diff --git a/tests/run/tonraise.nim b/tests/run/tonraise.nim deleted file mode 100644 index 1a555dd94..000000000 --- a/tests/run/tonraise.nim +++ /dev/null @@ -1,34 +0,0 @@ -discard """ - output: '''i: 1 -success''' -""" - -type - ESomething = object of E_Base - ESomeOtherErr = object of E_Base - -proc genErrors(s: string) = - if s == "error!": - raise newException(ESomething, "Test") - else: - raise newException(EsomeotherErr, "bla") - -proc foo() = - var i = 0 - try: - inc i - onRaise(proc (e: ref E_Base): bool = - echo "i: ", i) - genErrors("errssor!") - except ESomething: - echo("ESomething happened") - except: - echo("Some other error happened") - - # test that raise handler is gone: - try: - genErrors("error!") - except ESomething: - echo "success" - -foo() -- cgit 1.4.1-2-gfad0