refactor: use `unsafePerformIO hack' for global var

[mate.git] / Mate / MethodPool.hs

diff --git a/Mate/MethodPool.hs b/Mate/MethodPool.hs
index 21c179546fa57a82dd5539778019778135e0d3a8..16890c85f7bca01d6842a52dd3198c58fe34c583 100644 (file)
--- 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