X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=Mate%2FMethodPool.hs;h=16890c85f7bca01d6842a52dd3198c58fe34c583;hb=3160b1426c25340503b5ab216965e30509cd8416;hp=21c179546fa57a82dd5539778019778135e0d3a8;hpb=55d3b7af8c3a1fdef0c5e470e649d180dc0a3911;p=mate.git

diff --git a/Mate/MethodPool.hs b/Mate/MethodPool.hs
index 21c1795..16890c8 100644
--- a/Mate/MethodPool.hs
+++ b/Mate/MethodPool.hs
@@ -137,10 +137,6 @@ loadNativeFunction sym = do
 --   mmap2ptr mmap >>= set_mmap
 --   demo_mmap -- access Data.Map from C
 
-initMethodPool :: IO ()
-initMethodPool = ctx2ptr emptyMateCtx >>= set_mate_context
-
-
 addMethodRef :: Word32 -> MethodInfo -> [B.ByteString] -> IO ()
 addMethodRef entry (MethodInfo mmname _ msig) clsnames = do
   mmap <- getMethodMap