Remove InlinePlease and add inline function and RULE

[ghc-hetmet.git] / compiler / iface / BinIface.hs

diff --git a/compiler/iface/BinIface.hs b/compiler/iface/BinIface.hs
index a31988a..6b56119 100644 (file)
--- a/compiler/iface/BinIface.hs
+++ b/compiler/iface/BinIface.hs
@@ -864,8 +864,6 @@ instance Binary IfaceNote where
     put_ bh (IfaceCoerce ab) = do
            putByte bh 1
            put_ bh ab
-    put_ bh IfaceInlineCall = do
-           putByte bh 2
     put_ bh IfaceInlineMe = do
            putByte bh 3
     put_ bh (IfaceCoreNote s) = do
@@ -878,7 +876,6 @@ instance Binary IfaceNote where
                      return (IfaceSCC aa)
              1 -> do ab <- get bh
                      return (IfaceCoerce ab)
-             2 -> do return IfaceInlineCall
              3 -> do return IfaceInlineMe
               _ -> do ac <- get bh
                       return (IfaceCoreNote ac)