dph-prim-interface: don't export locked zipwith code, we're abandoning it
authorBen Lippmeier <benl@ouroborus.net>
Mon, 29 Oct 2012 03:50:00 +0000 (14:50 +1100)
committerBen Lippmeier <benl@ouroborus.net>
Thu, 1 Nov 2012 00:39:50 +0000 (11:39 +1100)
dph-prim-interface/interface/DPH_Header.h
dph-prim-interface/interface/DPH_Interface.h

index 059744f..1a9af24 100644 (file)
@@ -47,13 +47,13 @@ module Data.Array.Parallel.Unlifted (
 
   -- * Map and ZipWith
   map,
-  zipWith,      lockedZipWith,
-  zipWith3,     lockedZipWith3,
-  zipWith4,     lockedZipWith4,
-  zipWith5,     lockedZipWith5,
-  zipWith6,     lockedZipWith6,
-  zipWith7,     lockedZipWith7,
-  zipWith8,     lockedZipWith8,
+  zipWith,
+  zipWith3,
+  zipWith4,
+  zipWith5,
+  zipWith6,
+  zipWith7,
+  zipWith8,
 
   -- * Scans and Folds
   scan,
index dbdab25..a8b8f0f 100644 (file)
@@ -511,56 +511,6 @@ zipWith8 fn as bs cs ds es fs gs hs
   #-}
 
 
--- == Locked ZipWiths =========================================================
--- | Apply a worker function to correponding elements of two arrays.
-lockedZipWith :: (Elt a, Elt b, Elt c)
-        => (a -> b -> c) -> Array a -> Array b -> Array c
-{-# INLINE_BACKEND lockedZipWith #-}
-
-
--- | Apply a worker function to corresponding elements of three arrays.
-lockedZipWith3 :: (Elt a, Elt b, Elt c, Elt d)
-          => (a -> b -> c -> d) -> Array a -> Array b -> Array c -> Array d
-{-# INLINE_BACKEND lockedZipWith3 #-}
-
-
--- | Apply a worker function to corresponding elements of four arrays.
-lockedZipWith4 :: (Elt a, Elt b, Elt c, Elt d, Elt e)
-         => (a -> b -> c -> d -> e)
-         -> Array a -> Array b -> Array c -> Array d -> Array e
-{-# INLINE_BACKEND lockedZipWith4 #-}
-
-
--- | Apply a worker function to corresponding elements of five arrays.
-lockedZipWith5 :: (Elt a, Elt b, Elt c, Elt d, Elt e, Elt f)
-         => (a -> b -> c -> d -> e -> f)
-         -> Array a -> Array b -> Array c -> Array d -> Array e -> Array f
-{-# INLINE_BACKEND lockedZipWith5 #-}
-
-
--- | Apply a worker function to corresponding elements of six arrays.
-lockedZipWith6 :: (Elt a, Elt b, Elt c, Elt d, Elt e, Elt f, Elt g)
-         => (a -> b -> c -> d -> e -> f ->g)
-         -> Array a -> Array b -> Array c -> Array d -> Array e -> Array f -> Array g
-{-# INLINE_BACKEND lockedZipWith6 #-}
-
-
--- | Apply a worker function to corresponding elements of seven arrays.
-lockedZipWith7 :: (Elt a, Elt b, Elt c, Elt d, Elt e, Elt f, Elt g, Elt h)
-         => (a -> b -> c -> d -> e -> f -> g ->h)
-         -> Array a -> Array b -> Array c -> Array d -> Array e -> Array f -> Array g 
-         -> Array h
-{-# INLINE_BACKEND lockedZipWith7 #-}
-
-
--- | Apply a worker function to corresponding elements of six arrays.
-lockedZipWith8 :: (Elt a, Elt b, Elt c, Elt d, Elt e, Elt f, Elt g, Elt h, Elt i)
-         => (a -> b -> c -> d -> e -> f -> g ->h -> i)
-         -> Array a -> Array b -> Array c -> Array d -> Array e -> Array f -> Array g 
-         -> Array h -> Array i
-{-# INLINE_BACKEND lockedZipWith8 #-}
-
-
 -- Folds and Scans ============================================================
 -- Scans ------------------------------
 -- | Similar to `foldl` but return an array of the intermediate states, including