From: Thomas Schilling <nominolo@googlemail.com>
Date: Fri, 31 Oct 2008 16:20:36 +0000 (+0000)
Subject: Remove dead code.
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9fa1c9f1f97d3f270fec864e272be18ef6a46a10;p=ghc-hetmet.git

Remove dead code.
---

diff --git a/compiler/typecheck/TcSplice.lhs b/compiler/typecheck/TcSplice.lhs
index 49f1bf8..f025ac2 100644
--- a/compiler/typecheck/TcSplice.lhs
+++ b/compiler/typecheck/TcSplice.lhs
@@ -381,7 +381,6 @@ runAnnotation target expr = do
     expr_ty <- newFlexiTyVarTy liftedTypeKind
     
     -- Find the classes we want instances for in order to call toAnnotationWrapper
-    _typeable_class <- tcLookupClass typeableClassName
     data_class <- tcLookupClass dataClassName
     
     -- Check the instances we require live in another module (we want to execute it..)