{-# LANGUAGE ForeignFunctionInterface #-} module HROOT.Tree.TChain.FFI where import Foreign.C import Foreign.Ptr import HROOT.Tree.TChain.RawType import HROOT.Tree.TBranch.RawType import HROOT.Core.TObject.RawType import HROOT.Core.TClass.RawType foreign import ccall safe "HROOTTreeTChain.h TChain_Branch" c_tchain_branch :: Ptr RawTChain -> CString -> CInt -> CInt -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_branch1" c_tchain_branch1 :: Ptr RawTChain -> CString -> (Ptr ()) -> CString -> CInt -> IO (Ptr RawTBranch) foreign import ccall safe "HROOTTreeTChain.h TChain_fillTree" c_tchain_filltree :: Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_SetName" c_tchain_setname :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetNameTitle" c_tchain_setnametitle :: Ptr RawTChain -> CString -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetTitle" c_tchain_settitle :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_GetLineColor" c_tchain_getlinecolor :: Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_GetLineStyle" c_tchain_getlinestyle :: Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_GetLineWidth" c_tchain_getlinewidth :: Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_ResetAttLine" c_tchain_resetattline :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetLineAttributes" c_tchain_setlineattributes :: Ptr RawTChain -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetLineColor" c_tchain_setlinecolor :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetLineStyle" c_tchain_setlinestyle :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetLineWidth" c_tchain_setlinewidth :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetFillColor" c_tchain_setfillcolor :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetFillStyle" c_tchain_setfillstyle :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_GetMarkerColor" c_tchain_getmarkercolor :: Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_GetMarkerStyle" c_tchain_getmarkerstyle :: Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_GetMarkerSize" c_tchain_getmarkersize :: Ptr RawTChain -> IO CDouble foreign import ccall safe "HROOTTreeTChain.h TChain_ResetAttMarker" c_tchain_resetattmarker :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetMarkerAttributes" c_tchain_setmarkerattributes :: Ptr RawTChain -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetMarkerColor" c_tchain_setmarkercolor :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetMarkerStyle" c_tchain_setmarkerstyle :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SetMarkerSize" c_tchain_setmarkersize :: Ptr RawTChain -> CInt -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_Draw" c_tchain_draw :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_FindObject" c_tchain_findobject :: Ptr RawTChain -> CString -> IO (Ptr RawTObject) foreign import ccall safe "HROOTTreeTChain.h TChain_GetName" c_tchain_getname :: Ptr RawTChain -> IO CString foreign import ccall safe "HROOTTreeTChain.h TChain_IsA" c_tchain_isa :: Ptr RawTChain -> IO (Ptr RawTClass) foreign import ccall safe "HROOTTreeTChain.h TChain_Paint" c_tchain_paint :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_printObj" c_tchain_printobj :: Ptr RawTChain -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_SaveAs" c_tchain_saveas :: Ptr RawTChain -> CString -> CString -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_Write" c_tchain_write :: Ptr RawTChain -> CString -> CInt -> CInt -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_delete" c_tchain_delete :: Ptr RawTChain -> IO () foreign import ccall safe "HROOTTreeTChain.h TChain_newTChain" c_tchain_newtchain :: CString -> CString -> IO (Ptr RawTChain) foreign import ccall safe "HROOTTreeTChain.h TChain_addChain" c_tchain_addchain :: Ptr RawTChain -> Ptr RawTChain -> IO CInt foreign import ccall safe "HROOTTreeTChain.h TChain_addChain1" c_tchain_addchain1 :: Ptr RawTChain -> CString -> CLong -> IO CInt