From 33db1946d2a09898761b7d397fe4028725f2215b Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Wed, 3 Jan 2018 09:24:21 +0100
Subject: Rename & restructure

---
 assignment-13/uFPL/Arduino.icl | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 assignment-13/uFPL/Arduino.icl

(limited to 'assignment-13/uFPL/Arduino.icl')

diff --git a/assignment-13/uFPL/Arduino.icl b/assignment-13/uFPL/Arduino.icl
new file mode 100644
index 0000000..2fbab30
--- /dev/null
+++ b/assignment-13/uFPL/Arduino.icl
@@ -0,0 +1,16 @@
+implementation module uFPL.Arduino
+
+import StdOverloaded
+
+import uFPL.Util
+
+instance toString Button
+where
+	toString B0 = "B0"
+	toString B1 = "B1"
+	toString B2 = "B2"
+	toString B3 = "B3"
+	toString B4 = "B4"
+	toString B5 = "B5"
+
+instance print Button where print b = print (toString b)
-- 
cgit v1.2.3