module HROOT.Core.TSystem.FFI where
import Foreign.C
import Foreign.Ptr
import HROOT.Core.TSystem.RawType
import HROOT.Core.TObject.RawType
import HROOT.Core.TClass.RawType
foreign import ccall "HROOTCoreTSystem.h TSystem_SetName" c_tsystem_setname
:: (Ptr RawTSystem) -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_SetNameTitle" c_tsystem_setnametitle
:: (Ptr RawTSystem) -> CString -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_SetTitle" c_tsystem_settitle
:: (Ptr RawTSystem) -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_Draw" c_tsystem_draw
:: (Ptr RawTSystem) -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_FindObject" c_tsystem_findobject
:: (Ptr RawTSystem) -> CString -> IO (Ptr RawTObject)
foreign import ccall "HROOTCoreTSystem.h TSystem_GetName" c_tsystem_getname
:: (Ptr RawTSystem) -> IO CString
foreign import ccall "HROOTCoreTSystem.h TSystem_IsA" c_tsystem_isa
:: (Ptr RawTSystem) -> IO (Ptr RawTClass)
foreign import ccall "HROOTCoreTSystem.h TSystem_Paint" c_tsystem_paint
:: (Ptr RawTSystem) -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_printObj" c_tsystem_printobj
:: (Ptr RawTSystem) -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_SaveAs" c_tsystem_saveas
:: (Ptr RawTSystem) -> CString -> CString -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_Write" c_tsystem_write
:: (Ptr RawTSystem) -> CString -> CInt -> CInt -> IO CInt
foreign import ccall "HROOTCoreTSystem.h TSystem_delete" c_tsystem_delete
:: (Ptr RawTSystem) -> IO ()
foreign import ccall "HROOTCoreTSystem.h TSystem_ProcessEvents" c_tsystem_processevents
:: (Ptr RawTSystem) -> IO CInt