instanceOf: also consider interfaces

[mate.git] / Mate / ClassHierarchy.hs-boot

diff --git a/Mate/ClassHierarchy.hs-boot b/Mate/ClassHierarchy.hs-boot
index f274b8393e835572c364207791ebb05656b06bdd..9a0febeebf843b7e51ac1c5fe5b1e0d93ca2f777 100644 (file)
--- a/Mate/ClassHierarchy.hs-boot
+++ b/Mate/ClassHierarchy.hs-boot
@@ -1,10 +1,12 @@
 module Mate.ClassHierarchy
   ( isInstanceOf
   , addClassEntry
+  , addInterfaceEntry
   ) where
 
 import qualified Data.ByteString.Lazy as B
 import Mate.NativeSizes
 
 isInstanceOf :: NativeWord -> B.ByteString -> IO Bool
-addClassEntry :: NativeWord -> NativeWord -> IO ()
+addClassEntry :: NativeWord -> NativeWord -> [B.ByteString] -> IO ()
+addInterfaceEntry :: B.ByteString -> [B.ByteString] -> IO ()