X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=mate.git;a=blobdiff_plain;f=Mate%2FClassHierarchy.hs-boot;h=9a0febeebf843b7e51ac1c5fe5b1e0d93ca2f777;hp=f274b8393e835572c364207791ebb05656b06bdd;hb=a4bb7e3e5262cf10f1a013705d8908ad28225491;hpb=040b92a7a38d2518f5603a6c01db59eb983ad20e

diff --git a/Mate/ClassHierarchy.hs-boot b/Mate/ClassHierarchy.hs-boot
index f274b83..9a0febe 100644
--- 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 ()