safe set

Author: dmjio

arrayfire.cabal

@@ -87,6 +87,10 @@ library
     af
   c-sources:
     cbits/wrapper.c
+  cxx-sources:
+    cbits/af_backend_safe.cpp
+  cxx-options:
+    -std=c++11
   build-depends:
     base < 5, filepath, vector
   hs-source-dirs:

src/ArrayFire/Internal/Backend.hsc

@@ -7,15 +7,15 @@ import Foreign.Ptr
 import Foreign.C.Types
 
 #include "af/backend.h"
-foreign import ccall unsafe "af_set_backend"
+foreign import ccall unsafe "af_set_backend_safe"
     af_set_backend :: AFBackend -> IO AFErr
-foreign import ccall unsafe "af_get_backend_count"
+foreign import ccall unsafe "af_get_backend_count_safe"
     af_get_backend_count :: Ptr CUInt -> IO AFErr
-foreign import ccall unsafe "af_get_available_backends"
+foreign import ccall unsafe "af_get_available_backends_safe"
     af_get_available_backends :: Ptr CInt -> IO AFErr
 foreign import ccall unsafe "af_get_backend_id"
     af_get_backend_id :: Ptr AFBackend -> AFArray -> IO AFErr
-foreign import ccall unsafe "af_get_active_backend"
+foreign import ccall unsafe "af_get_active_backend_safe"
     af_get_active_backend :: Ptr AFBackend -> IO AFErr
 foreign import ccall unsafe "af_get_device_id"
     af_get_device_id :: Ptr CInt -> AFArray -> IO AFErr