{-# LINE 1 "src/HROOT/Class/TArrayS/FFI.hsc" #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LINE 2 "src/HROOT/Class/TArrayS/FFI.hsc" #-} -- module HROOT.Class.FFI where module HROOT.Class.TArrayS.FFI where import Foreign.C import Foreign.Ptr -- import HROOT.Class.Interface -- #include "" import HROOT.Class.TArrayS.RawType {-# LINE 19 "src/HROOT/Class/TArrayS/FFI.hsc" #-} foreign import ccall "HROOTTArrayS.h TArrayS_delete" c_tarrays_delete :: (Ptr RawTArrayS) -> IO ()