{-# LINE 1 "src/HROOT/Class/TArrayL/FFI.hsc" #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LINE 2 "src/HROOT/Class/TArrayL/FFI.hsc" #-} -- module HROOT.Class.FFI where module HROOT.Class.TArrayL.FFI where import Foreign.C import Foreign.Ptr -- import HROOT.Class.Interface -- #include "" import HROOT.Class.TArrayL.RawType {-# LINE 19 "src/HROOT/Class/TArrayL/FFI.hsc" #-} foreign import ccall "HROOTTArrayL.h TArrayL_delete" c_tarrayl_delete :: (Ptr RawTArrayL) -> IO ()