{-# LANGUAGE ForeignFunctionInterface #-} module HROOT.Graf.TSPHE.FFI where import Foreign.C import Foreign.Ptr import HROOT.Graf.TSPHE.RawType import HROOT.Core.TObject.RawType import HROOT.Core.TClass.RawType foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetName" c_tsphe_setname :: Ptr RawTSPHE -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetNameTitle" c_tsphe_setnametitle :: Ptr RawTSPHE -> CString -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetTitle" c_tsphe_settitle :: Ptr RawTSPHE -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_GetLineColor" c_tsphe_getlinecolor :: Ptr RawTSPHE -> IO CInt foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_GetLineStyle" c_tsphe_getlinestyle :: Ptr RawTSPHE -> IO CInt foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_GetLineWidth" c_tsphe_getlinewidth :: Ptr RawTSPHE -> IO CInt foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_ResetAttLine" c_tsphe_resetattline :: Ptr RawTSPHE -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetLineAttributes" c_tsphe_setlineattributes :: Ptr RawTSPHE -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetLineColor" c_tsphe_setlinecolor :: Ptr RawTSPHE -> CInt -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetLineStyle" c_tsphe_setlinestyle :: Ptr RawTSPHE -> CInt -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetLineWidth" c_tsphe_setlinewidth :: Ptr RawTSPHE -> CInt -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetFillColor" c_tsphe_setfillcolor :: Ptr RawTSPHE -> CInt -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SetFillStyle" c_tsphe_setfillstyle :: Ptr RawTSPHE -> CInt -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_Draw" c_tsphe_draw :: Ptr RawTSPHE -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_FindObject" c_tsphe_findobject :: Ptr RawTSPHE -> CString -> IO (Ptr RawTObject) foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_GetName" c_tsphe_getname :: Ptr RawTSPHE -> IO CString foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_IsA" c_tsphe_isa :: Ptr RawTSPHE -> IO (Ptr RawTClass) foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_Paint" c_tsphe_paint :: Ptr RawTSPHE -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_printObj" c_tsphe_printobj :: Ptr RawTSPHE -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_SaveAs" c_tsphe_saveas :: Ptr RawTSPHE -> CString -> CString -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_Write" c_tsphe_write :: Ptr RawTSPHE -> CString -> CInt -> CInt -> IO CInt foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_delete" c_tsphe_delete :: Ptr RawTSPHE -> IO () foreign import ccall safe "HROOTGrafTSPHE.h TSPHE_newTSPHE" c_tsphe_newtsphe :: CString -> CString -> CString -> CDouble -> CDouble -> CDouble -> CDouble -> CDouble -> CDouble -> IO (Ptr RawTSPHE)