meta-par-accelerate 0.3.4 → 0.3.5
raw patch · 2 files changed
+13/−10 lines, 2 filesdep −accelerate-io
Dependencies removed: accelerate-io
Files
Control/Monad/Par/Meta/Resources/Accelerate.hs view
@@ -24,12 +24,12 @@ import Control.Monad.IO.Class import Data.Array.Accelerate (Acc, Arrays)--- #ifdef ACCELERATE_CUDA_BACKEND--- #warning "Loading REAL, LIVE CUDA BACKEND..."--- import qualified Data.Array.Accelerate.CUDA as Acc--- #else+#ifdef ACCELERATE_CUDA_BACKEND+#warning "meta-par-accelerate: Loading REAL, LIVE CUDA BACKEND..."+import qualified Data.Array.Accelerate.CUDA as Run+#else import qualified Data.Array.Accelerate.Interpreter as Run--- #endif+#endif import Data.Concurrent.Deque.Class (ConcQueue, WSDeque) import Data.Concurrent.Deque.Reference as R@@ -167,7 +167,7 @@ -- Generic instance for Meta.Par, needs to be newtype-derived for specific schedulers. instance AC.ParAccelerate IVar Par where - getDefaultAccImpl = return Run.run -- TEMP! FIXME - returning interpreter for now. + getDefaultAccImpl = return Run.run -- TEMP! FIXME - don't ever use interpreter in the future. runAccWith = runAccWith spawnAccWith = spawnAccWith unsafeHybridWith = unsafeHybridWith
meta-par-accelerate.cabal view
@@ -1,5 +1,5 @@ Name: meta-par-accelerate-Version: 0.3.4+Version: 0.3.5 Synopsis: Support for integrated Accelerate computations within Meta-par. -- Version history:@@ -9,6 +9,7 @@ -- 0.3.2: tweak resulting from abstract-par-accelerate-0.3.2 -- 0.3.3: Remove erroneous ConstraintKinds usage. -- 0.3.4: Egad, ditto.+-- 0.3.5: Remove dep on accelerate-io. Set default to newAccelerate. Reactivate real CUDA. Description: This package provides a 'Control.Monad.Par.Meta.Resource' for building meta-par@@ -53,8 +54,10 @@ ghc-options: -Wall - if flag(newAccelerate) && flag(cuda)+ if flag(cuda) cpp-options: -DACCELERATE_CUDA_BACKEND++ if flag(newAccelerate) && flag(cuda) Build-depends: accelerate-cuda if flag(debug)@@ -62,14 +65,14 @@ if flag(newAccelerate) Build-depends: accelerate >= 0.12- , accelerate-io >= 0.12+-- , accelerate-io >= 0.12 else Build-depends: accelerate >= 0.10 && < 0.12 flag newAccelerate- default: False+ default: True -- Sets the default backend to CUDA: flag cuda