X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=Mate%2FX86CodeGen.hs;h=82ec9d8680768b3cf2c823174c62062353b04937;hb=c6a40fefbb30559ca4bf7f14bc37f8006bbc03af;hp=a28e4bb50d72b1fa67d6caff9639e8e478a54ba1;hpb=399b0642a76cf3ae0f1a654ba6466ea2ac7e9136;p=mate.git diff --git a/Mate/X86CodeGen.hs b/Mate/X86CodeGen.hs index a28e4bb..82ec9d8 100644 --- a/Mate/X86CodeGen.hs +++ b/Mate/X86CodeGen.hs @@ -39,12 +39,6 @@ foreign import ccall "callertrap" foreign import ccall "register_signal" register_signal :: IO () -foreign import ccall "get_cmap" - get_cmap :: IO (Ptr ()) - -foreign import ccall "set_cmap" - set_cmap :: Ptr () -> IO () - test_01, test_02, test_03 :: IO () test_01 = do register_signal