diff options
| -rw-r--r-- | tests/step5_tco.mal | 2 | ||||
| -rw-r--r-- | tests/step9_try.mal | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/tests/step5_tco.mal b/tests/step5_tco.mal index 9054c74..64f3d9d 100644 --- a/tests/step5_tco.mal +++ b/tests/step5_tco.mal @@ -8,7 +8,7 @@ ;;; no try* yet, so test completion of side-effects (def! res1 nil) ;=>nil -(def! res1 (sum-to 10000))) +(def! res1 (sum-to 10000)) res1 ;=>nil diff --git a/tests/step9_try.mal b/tests/step9_try.mal index 168b632..01fce99 100644 --- a/tests/step9_try.mal +++ b/tests/step9_try.mal @@ -13,8 +13,8 @@ ;;;; "exc is:" ["data" "foo"] ;;;;=>7 ;;;;=>7 -(try* (throw (list "data" "foo")) (catch* exc (do (prn "err:" exc) 7))) -; "err:" ("data" "foo") +(try* (throw (list 1 2 3)) (catch* exc (do (prn "err:" exc) 7))) +; "err:" (1 2 3) ;=>7 (try* (throw "my exception") (catch* exc (do (prn "exc:" exc) 7))) |