{-# LANGUAGE CPP #-} module ArrayFire.Internal.Features where import ArrayFire.Internal.Defines import Foreign.Ptr import Foreign.C.Types #include "af/features.h" foreign import ccall unsafe "af_create_features" af_create_features :: Ptr AFFeatures -> DimT -> IO AFErr foreign import ccall unsafe "af_retain_features" af_retain_features :: Ptr AFFeatures -> AFFeatures -> IO AFErr foreign import ccall unsafe "af_get_features_num" af_get_features_num :: Ptr DimT -> AFFeatures -> IO AFErr foreign import ccall unsafe "af_get_features_xpos" af_get_features_xpos :: Ptr AFArray -> AFFeatures -> IO AFErr foreign import ccall unsafe "af_get_features_ypos" af_get_features_ypos :: Ptr AFArray -> AFFeatures -> IO AFErr foreign import ccall unsafe "af_get_features_score" af_get_features_score :: Ptr AFArray -> AFFeatures -> IO AFErr foreign import ccall unsafe "af_get_features_orientation" af_get_features_orientation :: Ptr AFArray -> AFFeatures -> IO AFErr foreign import ccall unsafe "af_get_features_size" af_get_features_size :: Ptr AFArray -> AFFeatures -> IO AFErr foreign import ccall unsafe "&af_release_features" af_release_features :: FunPtr (AFFeatures -> IO ())