Remove an unused Show instance

91667cc9 · Ian Lynagh · b2ec66c3 · 91667cc9
Commit 91667cc9 authored Jun 12, 2012 by Ian Lynagh
--- a/compiler/basicTypes/Demand.lhs
+++ b/compiler/basicTypes/Demand.lhs
@@ -305,9 +305,6 @@ newtype StrictSig = StrictSig DmdType
 instance Outputable StrictSig where
   ppr (StrictSig ty) = ppr ty

-instance Show StrictSig where
-   show (StrictSig ty) = showSDoc (ppr ty)
-
 mkStrictSig :: DmdType -> StrictSig
 mkStrictSig dmd_ty = StrictSig dmd_ty