From cedc60f86a22eddef26d8db4cb3ec36d50a7fd75 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sat, 14 Jan 2017 00:57:12 +1100
Subject: Basic command line interface done

---
 src/Election.hs | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 src/Election.hs

(limited to 'src/Election.hs')

diff --git a/src/Election.hs b/src/Election.hs
new file mode 100644
index 0000000..082ee4c
--- /dev/null
+++ b/src/Election.hs
@@ -0,0 +1,31 @@
+module Election(
+    Election,
+
+    createElection,
+    doCount
+    ) where
+
+
+
+
+import qualified Counter as Sen
+
+
+
+
+data Election = Election String
+
+
+
+
+createElection :: FilePath -> Sen.SenateCounter -> IO Election
+createElection outDir counter = return (Election "testcode")
+
+
+
+
+doCount :: Election -> Int -> IO ()
+doCount election numToElect =
+    putStrLn "run election here"
+
+
-- 
cgit