From 79f193640c6f95d685885b19736bcb0aebbed2a6 Mon Sep 17 00:00:00 2001
From: joshvera <josh@joshvera.com>
Date: Mon, 25 Jun 2018 17:39:27 -0400
Subject: [PATCH] Remove show instance

---
 src/Data/Syntax.hs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/Data/Syntax.hs b/src/Data/Syntax.hs
index a9a7983dc..5586bc1c7 100644
--- a/src/Data/Syntax.hs
+++ b/src/Data/Syntax.hs
@@ -236,10 +236,6 @@ newtype ErrorStack = ErrorStack { unErrorStack :: [ErrorSite] }
   deriving anyclass (Named, Message)
   deriving newtype (MessageField)
 
--- instance Show ErrorStack where
---   showsPrec _ = shows . map showPair . unErrorStack
---     where showPair (sym, loc) = sym <> " " <> srcLocFile loc <> ":" <> show (srcLocStartLine loc) <> ":" <> show (srcLocStartCol loc)
-
 instance HasDefault ErrorStack where
   def = ErrorStack mempty