packages feed

HROOT-core-0.9: src/HROOT/Core/TAttFill/FFI.hsc

{-# LANGUAGE ForeignFunctionInterface #-}
module HROOT.Core.TAttFill.FFI where
import Foreign.C
import Foreign.Ptr
import HROOT.Core.TAttFill.RawType

foreign import ccall safe "HROOTCoreTAttFill.h TAttFill_delete"
               c_tattfill_delete :: Ptr RawTAttFill -> IO ()

foreign import ccall safe
               "HROOTCoreTAttFill.h TAttFill_newTAttFill" c_tattfill_newtattfill
               :: CInt -> CInt -> IO (Ptr RawTAttFill)

foreign import ccall safe
               "HROOTCoreTAttFill.h TAttFill_SetFillColor" c_tattfill_setfillcolor
               :: Ptr RawTAttFill -> CInt -> IO ()

foreign import ccall safe
               "HROOTCoreTAttFill.h TAttFill_SetFillStyle" c_tattfill_setfillstyle
               :: Ptr RawTAttFill -> CInt -> IO ()