X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2Fiface%2FTcIface.lhs;h=7c4c5354c6252b36975257d524b51c32a821d63d;hb=f2dcf256399e9a2de6343c625630b51f8abf4863;hp=caff95f6e90ffaa529f2f060bfe58881fb1a99ec;hpb=39dd1943735841b6cc62c91134189371ba571f38;p=ghc-hetmet.git diff --git a/compiler/iface/TcIface.lhs b/compiler/iface/TcIface.lhs index caff95f..7c4c535 100644 --- a/compiler/iface/TcIface.lhs +++ b/compiler/iface/TcIface.lhs @@ -639,7 +639,6 @@ tcIfaceExpr (IfaceNote note expr) IfaceCoerce to_ty -> tcIfaceType to_ty `thenM` \ to_ty' -> returnM (Note (Coerce to_ty' (exprType expr')) expr') - IfaceInlineCall -> returnM (Note InlineCall expr') IfaceInlineMe -> returnM (Note InlineMe expr') IfaceSCC cc -> returnM (Note (SCC cc) expr') IfaceCoreNote n -> returnM (Note (CoreNote n) expr')