diff options
| author | scgilardi <scgilardi@gmail.com> | 2009-06-11 05:57:21 +0000 |
|---|---|---|
| committer | scgilardi <scgilardi@gmail.com> | 2009-06-11 05:57:21 +0000 |
| commit | ed14fb1c4ff5829a7da61a09673006365f5db959 (patch) | |
| tree | 14e857154bc4a9cc81bf11c288c9bb7fdb93a4fe /src/clojure/contrib/condition/example.clj | |
| parent | 8711da996ee73bb21b94ec5a28cadc863bd422c1 (diff) | |
condition: add print-stack-trace, fix handling of nil forms in handler-case
Diffstat (limited to 'src/clojure/contrib/condition/example.clj')
| -rw-r--r-- | src/clojure/contrib/condition/example.clj | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/clojure/contrib/condition/example.clj b/src/clojure/contrib/condition/example.clj index e437cf6e..04ef7d67 100644 --- a/src/clojure/contrib/condition/example.clj +++ b/src/clojure/contrib/condition/example.clj @@ -34,6 +34,8 @@ (handler-case :source (handler-case :source + nil + nil (println (func 8 2)) (println (func -6 17)) ;; no handler for ::Args @@ -42,4 +44,5 @@ (println (func 3 4)) (println (func -5 10)) (handle ::Args + (print-stack-trace *condition*) (printf "Bad argument: %s\n" *condition*)))) |