X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fiface%2FMkIface.lhs;h=f7cb28a735d043a9ac5fd33892e1360fcdd95d60;hb=59264221c24a17e7c8ecde3e289882b9620bd5a8;hp=751811125ed42b4178e925a342e19f270eb4c832;hpb=c128930dc98c73e2459a4610539fee73ca941247;p=ghc-hetmet.git diff --git a/compiler/iface/MkIface.lhs b/compiler/iface/MkIface.lhs index 7518111..f7cb28a 100644 --- a/compiler/iface/MkIface.lhs +++ b/compiler/iface/MkIface.lhs @@ -1240,6 +1240,9 @@ toIfaceExpr (Note n e) = IfaceNote (toIfaceNote n) (toIfaceExpr e) toIfaceNote (SCC cc) = IfaceSCC cc toIfaceNote InlineMe = IfaceInlineMe toIfaceNote (CoreNote s) = IfaceCoreNote s +toIfaceNote (TickBox m n) = IfaceTickBox m n +toIfaceNote (BinaryTickBox m t e) + = IfaceBinaryTickBox m t e --------------------- toIfaceBind (NonRec b r) = IfaceNonRec (toIfaceIdBndr b) (toIfaceExpr r)