From 8ae4691e677414843cf3a84d4327d303fe3e2f41 Mon Sep 17 00:00:00 2001
From: Guillermo Ramos
Date: Mon, 2 Apr 2012 20:48:33 +0200
Subject: [Io] Día 2

---
 io/divbyzero.io | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 io/divbyzero.io

(limited to 'io/divbyzero.io')

diff --git a/io/divbyzero.io b/io/divbyzero.io
new file mode 100644
index 0000000..34b820e
--- /dev/null
+++ b/io/divbyzero.io
@@ -0,0 +1,14 @@
+"Before:" println
+writeln("3/2: ", 3/2)
+writeln("3/0: ", 3/0)
+writeln("3/-2: ", (3/(-2)))
+
+Number coreDiv := Number getSlot("/")
+Number / = method(n,
+	return if (n == 0, 0, self coreDiv(n))
+)
+
+"\nAfter:" println
+writeln("3/2: ", 3/2)
+writeln("3/0: ", 3/0)
+writeln("3/-2: ", (3/(-2)))
-- 
cgit v1.2.3