Skip to content

Commit 2312bf3

Browse files
dmjiodmjio
committed
Clean up imports
1 parent 957d1b1 commit 2312bf3

21 files changed

+34
-80
lines changed

‎gen/Main.hs

-2
Original file line numberDiff line numberDiff line change
@@ -71,8 +71,6 @@ file a = T.pack $ printf
7171
\module ArrayFire.Internal.%s where\n\n\
7272
\import ArrayFire.Internal.Defines\n\
7373
\import ArrayFire.Internal.Types\n\
74-
\import Data.Word\n\
75-
\import Data.Int\n\
7674
\import Foreign.Ptr\n\
7775
\import Foreign.C.Types\n\n\
7876
\#include \"af/%s.h\"\n\

‎src/ArrayFire/Internal/Algorithm.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Algorithm where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -76,4 +74,4 @@ foreign import ccall unsafe "af_set_unique"
7674
foreign import ccall unsafe "af_set_union"
7775
af_set_union :: Ptr AFArray -> AFArray -> AFArray -> CBool -> IO AFErr
7876
foreign import ccall unsafe "af_set_intersect"
79-
af_set_intersect :: Ptr AFArray -> AFArray -> AFArray -> CBool -> IO AFErr
77+
af_set_intersect :: Ptr AFArray -> AFArray -> AFArray -> CBool -> IO AFErr

‎src/ArrayFire/Internal/Arith.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Arith where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -148,4 +146,4 @@ foreign import ccall unsafe "af_iszero"
148146
foreign import ccall unsafe "af_isinf"
149147
af_isinf :: Ptr AFArray -> AFArray -> IO AFErr
150148
foreign import ccall unsafe "af_isnan"
151-
af_isnan :: Ptr AFArray -> AFArray -> IO AFErr
149+
af_isnan :: Ptr AFArray -> AFArray -> IO AFErr

‎src/ArrayFire/Internal/Array.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Array where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -70,4 +68,4 @@ foreign import ccall unsafe "af_is_bool"
7068
foreign import ccall unsafe "af_is_sparse"
7169
af_is_sparse :: Ptr CBool -> AFArray -> IO AFErr
7270
foreign import ccall unsafe "af_get_scalar"
73-
af_get_scalar :: Ptr () -> AFArray -> IO AFErr
71+
af_get_scalar :: Ptr () -> AFArray -> IO AFErr

‎src/ArrayFire/Internal/BLAS.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.BLAS where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -18,4 +16,4 @@ foreign import ccall unsafe "af_dot_all"
1816
foreign import ccall unsafe "af_transpose"
1917
af_transpose :: Ptr AFArray -> AFArray -> CBool -> IO AFErr
2018
foreign import ccall unsafe "af_transpose_inplace"
21-
af_transpose_inplace :: AFArray -> CBool -> IO AFErr
19+
af_transpose_inplace :: AFArray -> CBool -> IO AFErr

‎src/ArrayFire/Internal/Backend.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Backend where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -20,4 +18,4 @@ foreign import ccall unsafe "af_get_backend_id"
2018
foreign import ccall unsafe "af_get_active_backend"
2119
af_get_active_backend :: Ptr AFBackend -> IO AFErr
2220
foreign import ccall unsafe "af_get_device_id"
23-
af_get_device_id :: Ptr CInt -> AFArray -> IO AFErr
21+
af_get_device_id :: Ptr CInt -> AFArray -> IO AFErr

‎src/ArrayFire/Internal/Data.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Data where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -56,4 +54,4 @@ foreign import ccall unsafe "af_select_scalar_l"
5654
foreign import ccall unsafe "af_replace"
5755
af_replace :: AFArray -> AFArray -> AFArray -> IO AFErr
5856
foreign import ccall unsafe "af_replace_scalar"
59-
af_replace_scalar :: AFArray -> AFArray -> Double -> IO AFErr
57+
af_replace_scalar :: AFArray -> AFArray -> Double -> IO AFErr

‎src/ArrayFire/Internal/Device.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Device where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -60,4 +58,4 @@ foreign import ccall unsafe "af_lock_array"
6058
foreign import ccall unsafe "af_is_locked_array"
6159
af_is_locked_array :: Ptr CBool -> AFArray -> IO AFErr
6260
foreign import ccall unsafe "af_get_device_ptr"
63-
af_get_device_ptr :: Ptr (Ptr ()) -> AFArray -> IO AFErr
61+
af_get_device_ptr :: Ptr (Ptr ()) -> AFArray -> IO AFErr

‎src/ArrayFire/Internal/Exception.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,14 +2,12 @@
22
module ArrayFire.Internal.Exception where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

119
#include "af/defines.h"
1210
foreign import ccall unsafe "af_get_last_error"
1311
af_get_last_error :: Ptr (Ptr CChar) -> Ptr DimT -> IO ()
1412
foreign import ccall unsafe "af_err_to_string"
15-
af_err_to_string :: AFErr -> IO (Ptr CChar)
13+
af_err_to_string :: AFErr -> IO (Ptr CChar)

‎src/ArrayFire/Internal/Features.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Features where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -26,4 +24,4 @@ foreign import ccall unsafe "af_get_features_orientation"
2624
foreign import ccall unsafe "af_get_features_size"
2725
af_get_features_size :: Ptr AFArray -> AFFeatures -> IO AFErr
2826
foreign import ccall unsafe "&af_release_features"
29-
af_release_features :: FunPtr (AFFeatures -> IO ())
27+
af_release_features :: FunPtr (AFFeatures -> IO ())

‎src/ArrayFire/Internal/Graphics.hsc

+2-3
Original file line numberDiff line numberDiff line change
@@ -3,8 +3,7 @@ module ArrayFire.Internal.Graphics where
33

44
import ArrayFire.Internal.Defines
55
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
6+
87
import Foreign.Ptr
98
import Foreign.C.Types
109

@@ -66,4 +65,4 @@ foreign import ccall unsafe "af_is_window_closed"
6665
foreign import ccall unsafe "af_set_visibility"
6766
af_set_visibility :: AFWindow -> CBool -> IO AFErr
6867
foreign import ccall unsafe "af_destroy_window"
69-
af_destroy_window :: AFWindow -> IO AFErr
68+
af_destroy_window :: AFWindow -> IO AFErr

‎src/ArrayFire/Internal/Image.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Image where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -98,4 +96,4 @@ foreign import ccall unsafe "af_anisotropic_diffusion"
9896
foreign import ccall unsafe "af_iterative_deconv"
9997
af_iterative_deconv :: Ptr AFArray -> AFArray -> AFArray -> CUInt -> Float -> AFIterativeDeconvAlgo -> IO AFErr
10098
foreign import ccall unsafe "af_inverse_deconv"
101-
af_inverse_deconv :: Ptr AFArray -> AFArray -> AFArray -> Float -> AFInverseDeconvAlgo -> IO AFErr
99+
af_inverse_deconv :: Ptr AFArray -> AFArray -> AFArray -> Float -> AFInverseDeconvAlgo -> IO AFErr

‎src/ArrayFire/Internal/Index.hsc

+2-3
Original file line numberDiff line numberDiff line change
@@ -3,8 +3,7 @@ module ArrayFire.Internal.Index where
33

44
import ArrayFire.Internal.Defines
55
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
6+
87
import Foreign.Ptr
98
import Foreign.C.Types
109

@@ -28,4 +27,4 @@ foreign import ccall unsafe "af_set_seq_indexer"
2827
foreign import ccall unsafe "af_set_seq_param_indexer"
2928
af_set_seq_param_indexer :: Ptr AFIndex -> Double -> Double -> Double -> DimT -> CBool -> IO AFErr
3029
foreign import ccall unsafe "af_release_indexers"
31-
af_release_indexers :: Ptr AFIndex -> IO AFErr
30+
af_release_indexers :: Ptr AFIndex -> IO AFErr

‎src/ArrayFire/Internal/Internal.hsc

+1-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,6 @@
22
module ArrayFire.Internal.Internal where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
85
import Foreign.Ptr
96
import Foreign.C.Types
107

@@ -22,4 +19,4 @@ foreign import ccall unsafe "af_is_linear"
2219
foreign import ccall unsafe "af_is_owner"
2320
af_is_owner :: Ptr CBool -> AFArray -> IO AFErr
2421
foreign import ccall unsafe "af_get_allocated_bytes"
25-
af_get_allocated_bytes :: Ptr CSize -> AFArray -> IO AFErr
22+
af_get_allocated_bytes :: Ptr CSize -> AFArray -> IO AFErr

‎src/ArrayFire/Internal/LAPACK.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.LAPACK where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -40,4 +38,4 @@ foreign import ccall unsafe "af_det"
4038
foreign import ccall unsafe "af_norm"
4139
af_norm :: Ptr Double -> AFArray -> AFNormType -> Double -> Double -> IO AFErr
4240
foreign import ccall unsafe "af_is_lapack_available"
43-
af_is_lapack_available :: Ptr CBool -> IO AFErr
41+
af_is_lapack_available :: Ptr CBool -> IO AFErr

‎src/ArrayFire/Internal/Random.hsc

+2-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,7 @@
22
module ArrayFire.Internal.Random where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
5+
86
import Foreign.Ptr
97
import Foreign.C.Types
108

@@ -38,4 +36,4 @@ foreign import ccall unsafe "af_randn"
3836
foreign import ccall unsafe "af_set_seed"
3937
af_set_seed :: UIntL -> IO AFErr
4038
foreign import ccall unsafe "af_get_seed"
41-
af_get_seed :: Ptr UIntL -> IO AFErr
39+
af_get_seed :: Ptr UIntL -> IO AFErr

‎src/ArrayFire/Internal/Signal.hsc

+1-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,6 @@
22
module ArrayFire.Internal.Signal where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
85
import Foreign.Ptr
96
import Foreign.C.Types
107

@@ -78,4 +75,4 @@ foreign import ccall unsafe "af_medfilt1"
7875
foreign import ccall unsafe "af_medfilt2"
7976
af_medfilt2 :: Ptr AFArray -> AFArray -> DimT -> DimT -> AFBorderType -> IO AFErr
8077
foreign import ccall unsafe "af_set_fft_plan_cache_size"
81-
af_set_fft_plan_cache_size :: CSize -> IO AFErr
78+
af_set_fft_plan_cache_size :: CSize -> IO AFErr

‎src/ArrayFire/Internal/Sparse.hsc

+1-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,6 @@
22
module ArrayFire.Internal.Sparse where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
85
import Foreign.Ptr
96
import Foreign.C.Types
107

@@ -30,4 +27,4 @@ foreign import ccall unsafe "af_sparse_get_col_idx"
3027
foreign import ccall unsafe "af_sparse_get_nnz"
3128
af_sparse_get_nnz :: Ptr DimT -> AFArray -> IO AFErr
3229
foreign import ccall unsafe "af_sparse_get_storage"
33-
af_sparse_get_storage :: Ptr AFStorage -> AFArray -> IO AFErr
30+
af_sparse_get_storage :: Ptr AFStorage -> AFArray -> IO AFErr

‎src/ArrayFire/Internal/Statistics.hsc

+1-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,6 @@
22
module ArrayFire.Internal.Statistics where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
85
import Foreign.Ptr
96
import Foreign.C.Types
107

@@ -38,4 +35,4 @@ foreign import ccall unsafe "af_median_all"
3835
foreign import ccall unsafe "af_corrcoef"
3936
af_corrcoef :: Ptr Double -> Ptr Double -> AFArray -> AFArray -> IO AFErr
4037
foreign import ccall unsafe "af_topk"
41-
af_topk :: Ptr AFArray -> Ptr AFArray -> AFArray -> CInt -> CInt -> AFTopkFunction -> IO AFErr
38+
af_topk :: Ptr AFArray -> Ptr AFArray -> AFArray -> CInt -> CInt -> AFTopkFunction -> IO AFErr

‎src/ArrayFire/Internal/Util.hsc

+1-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,6 @@
22
module ArrayFire.Internal.Util where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
85
import Foreign.Ptr
96
import Foreign.C.Types
107

@@ -30,4 +27,4 @@ foreign import ccall unsafe "af_get_version"
3027
foreign import ccall unsafe "af_get_revision"
3128
af_get_revision :: IO (Ptr CChar)
3229
foreign import ccall unsafe "af_get_size_of"
33-
af_get_size_of :: Ptr CSize -> AFDtype -> IO AFErr
30+
af_get_size_of :: Ptr CSize -> AFDtype -> IO AFErr

‎src/ArrayFire/Internal/Vision.hsc

+1-4
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,6 @@
22
module ArrayFire.Internal.Vision where
33

44
import ArrayFire.Internal.Defines
5-
import ArrayFire.Internal.Types
6-
import Data.Word
7-
import Data.Int
85
import Foreign.Ptr
96
import Foreign.C.Types
107

@@ -30,4 +27,4 @@ foreign import ccall unsafe "af_susan"
3027
foreign import ccall unsafe "af_dog"
3128
af_dog :: Ptr AFArray -> AFArray -> CInt -> CInt -> IO AFErr
3229
foreign import ccall unsafe "af_homography"
33-
af_homography :: Ptr AFArray -> Ptr CInt -> AFArray -> AFArray -> AFArray -> AFArray -> AFHomographyType -> Float -> CUInt -> AFDtype -> IO AFErr
30+
af_homography :: Ptr AFArray -> Ptr CInt -> AFArray -> AFArray -> AFArray -> AFArray -> AFHomographyType -> Float -> CUInt -> AFDtype -> IO AFErr

0 commit comments

Comments
 (0)