{-# LANGUAGE ForeignFunctionInterface #-}

-- module HROOT.Class.FFI where

module HROOT.Class.TAttMarker.FFI where


import Foreign.C            
import Foreign.Ptr

-- import HROOT.Class.Interface

-- #include ""

import HROOT.Class.TAttMarker.RawType


#include "HROOTTAttMarker.h"

foreign import ccall "HROOTTAttMarker.h TAttMarker_delete" c_tattmarker_delete 
  :: (Ptr RawTAttMarker) -> IO ()
foreign import ccall "HROOTTAttMarker.h TAttMarker_newTAttMarker" c_tattmarker_newtattmarker 
  :: CInt -> CInt -> CInt -> IO (Ptr RawTAttMarker)
foreign import ccall "HROOTTAttMarker.h TAttMarker_GetMarkerColor" c_tattmarker_getmarkercolor 
  :: (Ptr RawTAttMarker) -> IO CInt
foreign import ccall "HROOTTAttMarker.h TAttMarker_GetMarkerStyle" c_tattmarker_getmarkerstyle 
  :: (Ptr RawTAttMarker) -> IO CInt
foreign import ccall "HROOTTAttMarker.h TAttMarker_GetMarkerSize" c_tattmarker_getmarkersize 
  :: (Ptr RawTAttMarker) -> IO CDouble
foreign import ccall "HROOTTAttMarker.h TAttMarker_ResetAttMarker" c_tattmarker_resetattmarker 
  :: (Ptr RawTAttMarker) -> CString -> IO ()
foreign import ccall "HROOTTAttMarker.h TAttMarker_SetMarkerAttributes" c_tattmarker_setmarkerattributes 
  :: (Ptr RawTAttMarker) -> IO ()
foreign import ccall "HROOTTAttMarker.h TAttMarker_SetMarkerColor" c_tattmarker_setmarkercolor 
  :: (Ptr RawTAttMarker) -> CInt -> IO ()
foreign import ccall "HROOTTAttMarker.h TAttMarker_SetMarkerStyle" c_tattmarker_setmarkerstyle 
  :: (Ptr RawTAttMarker) -> CInt -> IO ()
foreign import ccall "HROOTTAttMarker.h TAttMarker_SetMarkerSize" c_tattmarker_setmarkersize 
  :: (Ptr RawTAttMarker) -> CInt -> IO ()