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

-- module HROOT.Class.FFI where

module HROOT.Graf.TCrown.FFI where


import Foreign.C            
import Foreign.Ptr

-- import HROOT.Class.Interface

-- #include ""

import HROOT.Graf.TCrown.RawType
import HROOT.Core.TObject.RawType
import HROOT.Core.TClass.RawType


{-# LINE 20 "src/HROOT/Graf/TCrown/FFI.hsc" #-}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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