From 4b1350ead394472cb9612a4ae81ae160c208d7e3 Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Tue, 12 Jun 2012 02:03:14 +0100
Subject: Remove some redundant Show instances

---
 compiler/coreSyn/CoreSyn.lhs | 3 ---
 1 file changed, 3 deletions(-)

(limited to 'compiler/coreSyn')

diff --git a/compiler/coreSyn/CoreSyn.lhs b/compiler/coreSyn/CoreSyn.lhs
index 40243edc0a..e52a6cfe45 100644
--- a/compiler/coreSyn/CoreSyn.lhs
+++ b/compiler/coreSyn/CoreSyn.lhs
@@ -963,9 +963,6 @@ instance Outputable AltCon where
   ppr (LitAlt lit) = ppr lit
   ppr DEFAULT      = ptext (sLit "__DEFAULT")
 
-instance Show AltCon where
-  showsPrec p con = showsPrecSDoc p (ppr con)
-
 cmpAlt :: (AltCon, a, b) -> (AltCon, a, b) -> Ordering
 cmpAlt (con1, _, _) (con2, _, _) = con1 `cmpAltCon` con2
 
-- 
cgit v1.2.1