Time for an 2014 update…

2014-01-17 05:32:22 +00:00 · 2014-01-17 05:32:22 +00:00 · 09687c4926
commit 09687c4926
parent 372c577f83
2520 changed files with 34227 additions and 7318 deletions
--- a/Task/Detect-division-by-zero/TXR/detect-division-by-zero.txr
+++ b/Task/Detect-division-by-zero/TXR/detect-division-by-zero.txr
@ -0,0 +1,6 @@
+@(do (defun div-check (x y)
+       (catch (/ x y)
+         (numeric_error (msg)
+           'div-check-failed))))
+@(bind good @(div-check 32 8))
+@(bind bad @(div-check 42 0))