update

2013-06-05 21:47:54 +00:00 · 2013-06-05 21:47:54 +00:00 · 6f050a029e
commit 6f050a029e
parent 1f1ad49427
2496 changed files with 37609 additions and 3031 deletions
--- a/Task/Detect-division-by-zero/Aime/detect-division-by-zero.aime
+++ b/Task/Detect-division-by-zero/Aime/detect-division-by-zero.aime
@ -0,0 +1,21 @@
+integer
+divide(integer n, integer d)
+{
+    return n / d;
+}
+
+integer
+can_divide(integer n, integer d)
+{
+    return !trap(divide, n, d);
+}
+
+integer
+main(void)
+{
+    if (!can_divide(9, 0)) {
+        o_text("Division by zero.\n");
+    }
+
+    return 0;
+}