{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI #-} module HROOT.Core.TQObject.FFI where import Data.Word import Data.Int import Foreign.C import Foreign.Ptr import HROOT.Core.TQObject.RawType import HROOT.Core.TQObject.RawType foreign import ccall interruptible "HROOTCoreTQObject.h TQObject_delete" c_tqobject_delete :: Ptr RawTQObject -> IO ()