{-# LINE 1 "src/HROOT/Core/TArrayL64/FFI.hsc" #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LINE 2 "src/HROOT/Core/TArrayL64/FFI.hsc" #-} -- module HROOT.Class.FFI where module HROOT.Core.TArrayL64.FFI where import Foreign.C import Foreign.Ptr -- import HROOT.Class.Interface -- #include "" import HROOT.Core.TArrayL64.RawType {-# LINE 19 "src/HROOT/Core/TArrayL64/FFI.hsc" #-} foreign import ccall "HROOTCoreTArrayL64.h TArrayL64_delete" c_tarrayl64_delete :: (Ptr RawTArrayL64) -> IO ()