HROOT-graf-0.9: src/HROOT/Graf/TPCON/FFI.hsc

{-# LANGUAGE ForeignFunctionInterface #-}
module HROOT.Graf.TPCON.FFI where
import Foreign.C
import Foreign.Ptr
import HROOT.Graf.TPCON.RawType
import HROOT.Core.TObject.RawType
import HROOT.Core.TClass.RawType

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetName"
               c_tpcon_setname :: Ptr RawTPCON -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetNameTitle"
               c_tpcon_setnametitle :: Ptr RawTPCON -> CString -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetTitle"
               c_tpcon_settitle :: Ptr RawTPCON -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_GetLineColor"
               c_tpcon_getlinecolor :: Ptr RawTPCON -> IO CInt

foreign import ccall safe "HROOTGrafTPCON.h TPCON_GetLineStyle"
               c_tpcon_getlinestyle :: Ptr RawTPCON -> IO CInt

foreign import ccall safe "HROOTGrafTPCON.h TPCON_GetLineWidth"
               c_tpcon_getlinewidth :: Ptr RawTPCON -> IO CInt

foreign import ccall safe "HROOTGrafTPCON.h TPCON_ResetAttLine"
               c_tpcon_resetattline :: Ptr RawTPCON -> CString -> IO ()

foreign import ccall safe
               "HROOTGrafTPCON.h TPCON_SetLineAttributes"
               c_tpcon_setlineattributes :: Ptr RawTPCON -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetLineColor"
               c_tpcon_setlinecolor :: Ptr RawTPCON -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetLineStyle"
               c_tpcon_setlinestyle :: Ptr RawTPCON -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetLineWidth"
               c_tpcon_setlinewidth :: Ptr RawTPCON -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetFillColor"
               c_tpcon_setfillcolor :: Ptr RawTPCON -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SetFillStyle"
               c_tpcon_setfillstyle :: Ptr RawTPCON -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_Draw"
               c_tpcon_draw :: Ptr RawTPCON -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_FindObject"
               c_tpcon_findobject ::
               Ptr RawTPCON -> CString -> IO (Ptr RawTObject)

foreign import ccall safe "HROOTGrafTPCON.h TPCON_GetName"
               c_tpcon_getname :: Ptr RawTPCON -> IO CString

foreign import ccall safe "HROOTGrafTPCON.h TPCON_IsA" c_tpcon_isa
               :: Ptr RawTPCON -> IO (Ptr RawTClass)

foreign import ccall safe "HROOTGrafTPCON.h TPCON_Paint"
               c_tpcon_paint :: Ptr RawTPCON -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_printObj"
               c_tpcon_printobj :: Ptr RawTPCON -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_SaveAs"
               c_tpcon_saveas :: Ptr RawTPCON -> CString -> CString -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_Write"
               c_tpcon_write :: Ptr RawTPCON -> CString -> CInt -> CInt -> IO CInt

foreign import ccall safe "HROOTGrafTPCON.h TPCON_delete"
               c_tpcon_delete :: Ptr RawTPCON -> IO ()

foreign import ccall safe "HROOTGrafTPCON.h TPCON_newTPCON"
               c_tpcon_newtpcon ::
               CString ->
                 CString ->
                   CString -> CDouble -> CDouble -> CInt -> IO (Ptr RawTPCON)