From db11c7402768391a803cf83a4c55cac5e8202eb4 Mon Sep 17 00:00:00 2001 From: Chouser Date: Thu, 19 Feb 2015 18:37:21 -0500 Subject: Add tests for problems uncovered during forth self-hosted tests --- tests/step9_try.mal | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'tests/step9_try.mal') diff --git a/tests/step9_try.mal b/tests/step9_try.mal index 0ac0bf2..c7483ba 100644 --- a/tests/step9_try.mal +++ b/tests/step9_try.mal @@ -21,6 +21,10 @@ ; "exc:" "my exception" ;=>7 +;;; Test that throw is a function: +(try* (map throw [7]) (catch* exc exc)) +;=>7 + ;; ;; Testing builtin functions -- cgit v1.2.3