{-# LINE 1 "src/HROOT/Class/TPCON/FFI.hsc" #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LINE 2 "src/HROOT/Class/TPCON/FFI.hsc" #-}

-- module HROOT.Class.FFI where

module HROOT.Class.TPCON.FFI where


import Foreign.C            
import Foreign.Ptr

-- import HROOT.Class.Interface

-- #include ""

import HROOT.Class.TPCON.RawType
import HROOT.Class.TObject.RawType
import HROOT.Class.TClass.RawType


{-# LINE 20 "src/HROOT/Class/TPCON/FFI.hsc" #-}

foreign import ccall "HROOTTPCON.h TPCON_SetName" c_tpcon_setname 
  :: (Ptr RawTPCON) -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetNameTitle" c_tpcon_setnametitle 
  :: (Ptr RawTPCON) -> CString -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetTitle" c_tpcon_settitle 
  :: (Ptr RawTPCON) -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_GetLineColor" c_tpcon_getlinecolor 
  :: (Ptr RawTPCON) -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_GetLineStyle" c_tpcon_getlinestyle 
  :: (Ptr RawTPCON) -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_GetLineWidth" c_tpcon_getlinewidth 
  :: (Ptr RawTPCON) -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_ResetAttLine" c_tpcon_resetattline 
  :: (Ptr RawTPCON) -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetLineAttributes" c_tpcon_setlineattributes 
  :: (Ptr RawTPCON) -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetLineColor" c_tpcon_setlinecolor 
  :: (Ptr RawTPCON) -> CInt -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetLineStyle" c_tpcon_setlinestyle 
  :: (Ptr RawTPCON) -> CInt -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetLineWidth" c_tpcon_setlinewidth 
  :: (Ptr RawTPCON) -> CInt -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetFillColor" c_tpcon_setfillcolor 
  :: (Ptr RawTPCON) -> CInt -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SetFillStyle" c_tpcon_setfillstyle 
  :: (Ptr RawTPCON) -> CInt -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_Draw" c_tpcon_draw 
  :: (Ptr RawTPCON) -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_FindObject" c_tpcon_findobject 
  :: (Ptr RawTPCON) -> CString -> IO (Ptr RawTObject)
foreign import ccall "HROOTTPCON.h TPCON_GetName" c_tpcon_getname 
  :: (Ptr RawTPCON) -> IO CString
foreign import ccall "HROOTTPCON.h TPCON_IsA" c_tpcon_isa 
  :: (Ptr RawTPCON) -> IO (Ptr RawTClass)
foreign import ccall "HROOTTPCON.h TPCON_IsFolder" c_tpcon_isfolder 
  :: (Ptr RawTPCON) -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_IsEqual" c_tpcon_isequal 
  :: (Ptr RawTPCON) -> (Ptr RawTObject) -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_IsSortable" c_tpcon_issortable 
  :: (Ptr RawTPCON) -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_Paint" c_tpcon_paint 
  :: (Ptr RawTPCON) -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_printObj" c_tpcon_printobj 
  :: (Ptr RawTPCON) -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_RecursiveRemove" c_tpcon_recursiveremove 
  :: (Ptr RawTPCON) -> (Ptr RawTObject) -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_SaveAs" c_tpcon_saveas 
  :: (Ptr RawTPCON) -> CString -> CString -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_UseCurrentStyle" c_tpcon_usecurrentstyle 
  :: (Ptr RawTPCON) -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_Write" c_tpcon_write 
  :: (Ptr RawTPCON) -> CString -> CInt -> CInt -> IO CInt
foreign import ccall "HROOTTPCON.h TPCON_delete" c_tpcon_delete 
  :: (Ptr RawTPCON) -> IO ()
foreign import ccall "HROOTTPCON.h TPCON_newTPCON" c_tpcon_newtpcon 
  :: CString -> CString -> CString -> CDouble -> CDouble -> CInt -> IO (Ptr RawTPCON)