aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2015-03-21 17:54:06 +0900
committerSean Whitton <spwhitton@spwhitton.name>2015-03-21 17:54:06 +0900
commit39956694e5fd96de8da499e6a20010b372e5d314 (patch)
treeefe495e0c7d21872c89fff35ef2ee61949332af3
parentd17d818beddb2a50ceec64dc5d81775c8a2e31b7 (diff)
downloadsariulclocks-39956694e5fd96de8da499e6a20010b372e5d314.tar.gz
bare bones Table.hs
-rw-r--r--src/Text/Table.hs9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/Text/Table.hs b/src/Text/Table.hs
new file mode 100644
index 0000000..7a293bf
--- /dev/null
+++ b/src/Text/Table.hs
@@ -0,0 +1,9 @@
+module Text.Table ( tableFromRows
+ , TableHeader(..)
+ , TableRows(..)) where
+
+data Show a => TableHeader a = TableHeader [a]
+data Show a => TableRows a = TableRows [[a]]
+
+tableFromRows :: TableHeader a -> TableRows a -> String
+tableFromRows = undefined