Clean up of the exposed module

HIPERFIT · Dec 2, 2011 · a45c1f1 · a45c1f1
1 parent ccf0569
commit a45c1f1
Showing 1 changed file with 3 additions and 10 deletions.
diff --git a/Data/Array/Accelerate/OpenCL.hs b/Data/Array/Accelerate/OpenCL.hs
@@ -20,24 +20,17 @@ import System.IO.Unsafe
 
 -- standard library
 import Prelude hiding (catch)
---import Data.Record.Label
---import Control.Exception
 import Control.Applicative
---import System.IO.Unsafe
---import qualified Data.HashTable                   as Hash
-
 
 -- friends
 import Data.Array.Accelerate.AST                  (Arrays(..), ArraysR(..))
 import Data.Array.Accelerate.Smart                (Acc, convertAcc, convertAccFun1)
 import Data.Array.Accelerate.Array.Representation (size)
 import Data.Array.Accelerate.Array.Sugar          (Array(..))
 import Data.Array.Accelerate.OpenCL.Array.Data
-import Data.Array.Accelerate.OpenCL.State
+import Data.Array.Accelerate.OpenCL.State (evalOpenCL, CIO)
-import Data.Array.Accelerate.OpenCL.Compile
+import Data.Array.Accelerate.OpenCL.Compile (compileAcc)
-import Data.Array.Accelerate.OpenCL.Execute
+import Data.Array.Accelerate.OpenCL.Execute (executeAcc)
-
-import Data.Array.Accelerate.OpenCL.CodeGen
 
 -- | Compile and run a complete embedded array program using the OpenCL backend
 --