From: Christiaan Baaij Date: Thu, 23 Jul 2009 15:59:24 +0000 (+0200) Subject: Fix core show X-Git-Url: https://git.stderr.nl/gitweb?a=commitdiff_plain;h=d2917e27bd318299f37102a4799787bf01322daf;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git Fix core show --- diff --git "a/c\316\273ash/CLasH/Utils/Core/CoreShow.hs" "b/c\316\273ash/CLasH/Utils/Core/CoreShow.hs" index 192ecc8..aa1ea80 100644 --- "a/c\316\273ash/CLasH/Utils/Core/CoreShow.hs" +++ "b/c\316\273ash/CLasH/Utils/Core/CoreShow.hs" @@ -27,6 +27,7 @@ deriving instance (Show n, OutputableBndr n) => Show (HsTypes.HsType n) deriving instance (Show n, OutputableBndr n) => Show (HsTypes.ConDeclField n) deriving instance (Show x) => Show (SrcLoc.Located x) deriving instance (Show x, OutputableBndr x) => Show (HsExpr.StmtLR x x) +deriving instance (Show x, OutpubableBndr x) => Show (HsExpr.HsTupArg x) deriving instance (Show x, OutputableBndr x) => Show (HsExpr.HsExpr x) deriving instance Show (RdrName.RdrName) deriving instance (Show idL, Show idR, OutputableBndr idL, OutputableBndr idR) => Show (HsBinds.HsBindLR idL idR)