1 files changed, 0 insertions, 6 deletions
diff --git a/Main.hs b/Main.hs
index 75e031f..b244de1 100644
--- a/Main.hs
+++ b/Main.hs
@@ -152,12 +152,6 @@ modifyBuffer f =
     modify $ \st -> st { buffer = f (buffer st) }
 
 
--- TODO instance Show Buffer (w/newtype Buffer)
-
-showBuffer :: Buffer -> String
-showBuffer (lhs, rhs) = lhs ++ rhs
-
-
 
 newtype ExecM a = ExecM
     ( ErrorT ExecError (WriterT [String] (StateT VTState IO)) a