X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fiface%2FTcIface.lhs;h=6c60af873ec47f278574bcc517f399a0a6c4a2e3;hp=42321955e65a9abf76387a318d3972acd2c9dee5;hb=d5934bbb856aa0aa620c9b2e0fa51c90a1a5a048;hpb=33b8b60e0aa925962cd11a8be98d9818666d58a0 diff --git a/compiler/iface/TcIface.lhs b/compiler/iface/TcIface.lhs index 4232195..6c60af8 100644 --- a/compiler/iface/TcIface.lhs +++ b/compiler/iface/TcIface.lhs @@ -686,6 +686,8 @@ tcIfaceExpr (IfaceNote note expr) IfaceInlineMe -> returnM (Note InlineMe expr') IfaceSCC cc -> returnM (Note (SCC cc) expr') IfaceCoreNote n -> returnM (Note (CoreNote n) expr') + IfaceTickBox m n -> returnM (Note (TickBox m n) expr') + IfaceBinaryTickBox m t e -> returnM (Note (BinaryTickBox m t e) expr') ------------------------- tcIfaceAlt _ (IfaceDefault, names, rhs)