From 4295eeecc91dad4b40b4e5c0e6167ab925d551c7 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 8 Nov 2008 14:44:59 +0000 Subject: [PATCH] Remove some dead code now that __GLASGOW_HASKELL__ >= 606 --- compiler/typecheck/TcTyClsDecls.lhs | 4 ---- 1 file changed, 4 deletions(-) diff --git a/compiler/typecheck/TcTyClsDecls.lhs b/compiler/typecheck/TcTyClsDecls.lhs index 76e7426..69a984d 100644 --- a/compiler/typecheck/TcTyClsDecls.lhs +++ b/compiler/typecheck/TcTyClsDecls.lhs @@ -225,10 +225,6 @@ mkGlobalThings decls things = (name, AClass cl) mk_thing (L _ decl, ~(ATyCon tc)) = (tcdName decl, ATyCon tc) -#if __GLASGOW_HASKELL__ < 605 --- Old GHCs don't understand that ~... matches anything - mk_thing _ = panic "mkGlobalThings: Can't happen" -#endif \end{code} -- 1.7.10.4