diff options
| author | tv <tv@shackspace.de> | 2014-07-27 19:06:06 +0200 |
|---|---|---|
| committer | tv <tv@shackspace.de> | 2014-07-27 19:06:06 +0200 |
| commit | 5540655e4d68def52cc67e89ed50e7700d9df01b (patch) | |
| tree | ea8dcc30fa73c9b5d52c2006e06ec6db722dba04 /Buffer | |
| parent | 4589d9cf494d9cca19aa4da8aa754f6b31ef1876 (diff) | |
move showBuffer from Main to Buffer.Class
Diffstat (limited to 'Buffer')
| -rw-r--r-- | Buffer/Class.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Buffer/Class.hs b/Buffer/Class.hs index b2770b1..8f8bb75 100644 --- a/Buffer/Class.hs +++ b/Buffer/Class.hs @@ -4,3 +4,7 @@ module Buffer.Class where type Buffer = (String, String) emptyBuffer = ("", "") + +-- TODO instance Show Buffer (w/newtype Buffer) (?) +showBuffer :: Buffer -> String +showBuffer (lhs, rhs) = lhs ++ rhs |