summaryrefslogtreecommitdiff
path: root/assignment-13/Arduino.icl
diff options
context:
space:
mode:
authorCamil Staps2018-01-02 22:28:13 +0100
committerCamil Staps2018-01-02 22:28:13 +0100
commit82b4d838ee16fea80bfc0da630603273f7cba6c2 (patch)
tree1762a3ae13ae7b9758325606e301176ee1c61a67 /assignment-13/Arduino.icl
parentRemove value from cashModel; add further explanation to gastje (diff)
Start with assignment 13
Diffstat (limited to 'assignment-13/Arduino.icl')
-rw-r--r--assignment-13/Arduino.icl16
1 files changed, 16 insertions, 0 deletions
diff --git a/assignment-13/Arduino.icl b/assignment-13/Arduino.icl
new file mode 100644
index 0000000..fe108f4
--- /dev/null
+++ b/assignment-13/Arduino.icl
@@ -0,0 +1,16 @@
+implementation module Arduino
+
+import StdOverloaded
+
+import 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)