diff options
author | tv <tv@krebsco.de> | 2021-02-23 20:52:42 +0100 |
---|---|---|
committer | tv <tv@krebsco.de> | 2021-02-23 21:19:15 +0100 |
commit | f18d1afe54a73b030e892a1834bcc4f947c4c2ef (patch) | |
tree | 9fdb5a2c206b0b559f9fd808aa8d7084891e7681 /src/Hack/Buffer/Class.hs | |
parent | 288fb195158ce35895622c90866cd4b8fa9dc6d7 (diff) |
Buffer -> Hack.Buffer
Diffstat (limited to 'src/Hack/Buffer/Class.hs')
-rw-r--r-- | src/Hack/Buffer/Class.hs | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/Hack/Buffer/Class.hs b/src/Hack/Buffer/Class.hs new file mode 100644 index 0000000..3644717 --- /dev/null +++ b/src/Hack/Buffer/Class.hs @@ -0,0 +1,13 @@ +-- TODO Class is a lie +module Hack.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 |