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

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

foreign import ccall safe "HROOTGrafTCrown.h TCrown_Draw"
               c_tcrown_draw :: Ptr RawTCrown -> CString -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_FindObject"
               c_tcrown_findobject ::
               Ptr RawTCrown -> CString -> IO (Ptr RawTObject)

foreign import ccall safe "HROOTGrafTCrown.h TCrown_GetName"
               c_tcrown_getname :: Ptr RawTCrown -> IO CString

foreign import ccall safe "HROOTGrafTCrown.h TCrown_IsA"
               c_tcrown_isa :: Ptr RawTCrown -> IO (Ptr RawTClass)

foreign import ccall safe "HROOTGrafTCrown.h TCrown_Paint"
               c_tcrown_paint :: Ptr RawTCrown -> CString -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_printObj"
               c_tcrown_printobj :: Ptr RawTCrown -> CString -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_SaveAs"
               c_tcrown_saveas :: Ptr RawTCrown -> CString -> CString -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_Write"
               c_tcrown_write ::
               Ptr RawTCrown -> CString -> CInt -> CInt -> IO CInt

foreign import ccall safe "HROOTGrafTCrown.h TCrown_GetLineColor"
               c_tcrown_getlinecolor :: Ptr RawTCrown -> IO CInt

foreign import ccall safe "HROOTGrafTCrown.h TCrown_GetLineStyle"
               c_tcrown_getlinestyle :: Ptr RawTCrown -> IO CInt

foreign import ccall safe "HROOTGrafTCrown.h TCrown_GetLineWidth"
               c_tcrown_getlinewidth :: Ptr RawTCrown -> IO CInt

foreign import ccall safe "HROOTGrafTCrown.h TCrown_ResetAttLine"
               c_tcrown_resetattline :: Ptr RawTCrown -> CString -> IO ()

foreign import ccall safe
               "HROOTGrafTCrown.h TCrown_SetLineAttributes"
               c_tcrown_setlineattributes :: Ptr RawTCrown -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_SetLineColor"
               c_tcrown_setlinecolor :: Ptr RawTCrown -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_SetLineStyle"
               c_tcrown_setlinestyle :: Ptr RawTCrown -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_SetLineWidth"
               c_tcrown_setlinewidth :: Ptr RawTCrown -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_SetFillColor"
               c_tcrown_setfillcolor :: Ptr RawTCrown -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_SetFillStyle"
               c_tcrown_setfillstyle :: Ptr RawTCrown -> CInt -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_delete"
               c_tcrown_delete :: Ptr RawTCrown -> IO ()

foreign import ccall safe "HROOTGrafTCrown.h TCrown_newTCrown"
               c_tcrown_newtcrown ::
               CDouble ->
                 CDouble ->
                   CDouble -> CDouble -> CDouble -> CDouble -> IO (Ptr RawTCrown)