From: simonmar Date: Mon, 9 Jan 2006 14:33:21 +0000 (+0000) Subject: [project @ 2006-01-09 14:33:21 by simonmar] X-Git-Tag: final_switch_to_darcs,_this_repo_is_now_live~51 X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=564fe4b71b7fedc5167a616fb630bea3eff2e721 [project @ 2006-01-09 14:33:21 by simonmar] Remove dead panic --- diff --git a/ghc/compiler/hsSyn/HsDecls.lhs b/ghc/compiler/hsSyn/HsDecls.lhs index 8c23d48..dadcc6b 100644 --- a/ghc/compiler/hsSyn/HsDecls.lhs +++ b/ghc/compiler/hsSyn/HsDecls.lhs @@ -573,7 +573,6 @@ pprConDecl (ConDecl con expl tvs cxt details (ResTyGADT res_ty)) where ppr_details (PrefixCon arg_tys) = dcolon <+> ppr (foldr mk_fun_ty res_ty arg_tys) ppr_details (RecCon fields) = ppr fields <+> dcolon <+> ppr res_ty - ppr_details (PrefixCon _) = pprPanic "pprConDecl" (ppr con) mk_fun_ty a b = noLoc (HsFunTy a b)