Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : ghc-kinds

http://hackage.haskell.org/trac/ghc/changeset/530a03ed68cf969892eff711ef981ab2cc1e50cd

>---------------------------------------------------------------

commit 530a03ed68cf969892eff711ef981ab2cc1e50cd
Author: Julien Cretin <g...@ia0.eu>
Date:   Fri Sep 9 10:57:02 2011 +0200

    fix compilation of previous merge

>---------------------------------------------------------------

 compiler/typecheck/TcTyClsDecls.lhs |    2 --
 1 files changed, 0 insertions(+), 2 deletions(-)

diff --git a/compiler/typecheck/TcTyClsDecls.lhs 
b/compiler/typecheck/TcTyClsDecls.lhs
index 371b39c..4d9c111 100644
--- a/compiler/typecheck/TcTyClsDecls.lhs
+++ b/compiler/typecheck/TcTyClsDecls.lhs
@@ -562,8 +562,6 @@ tcTyClDecl1 _parent calc_isrec
 tcTyClDecl1 _ _
   (ForeignType {tcdLName = L _ tc_name, tcdExtName = tc_ext_name})
   = return [ATyCon (mkForeignTyCon tc_name tc_ext_name liftedTypeKind 0)]
-
-tcTyClDecl1 _ _ d = pprPanic "tcTyClDecl1" (ppr d)
 \end{code}
 
 \begin{code}



_______________________________________________
Cvs-ghc mailing list
Cvs-ghc@haskell.org
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to