diff options
Diffstat (limited to 'Buffer/Class.hs')
-rw-r--r-- | Buffer/Class.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Buffer/Class.hs b/Buffer/Class.hs index 8f8bb75..75664a5 100644 --- a/Buffer/Class.hs +++ b/Buffer/Class.hs @@ -1,10 +1,13 @@ -- TODO Class is a lie module Buffer.Class where + type Buffer = (String, String) +emptyBuffer :: Buffer emptyBuffer = ("", "") + -- TODO instance Show Buffer (w/newtype Buffer) (?) showBuffer :: Buffer -> String showBuffer (lhs, rhs) = lhs ++ rhs |