Commits

Aleksey Khudyakov committed 9439bb5

Complete deprecation

Comments (0)

Files changed (1)

Data/Histogram/Fill.hs

   , HBuilderM
   , feedOne
   , freezeHBuilderM
-  , joinHBuilderM
   , treeHBuilderM
     -- ** Stateless
   , HBuilder(HBuilder)
   , toHBuilderST
   , toHBuilderIO
-  , joinHBuilder
   , treeHBuilder
     -- * Histogram constructors
     -- ** Using unboxed vectors
   , forceFloat
     -- * Examples
     -- $examples
+    -- * Deprecated functions
+  , joinHBuilder
+  , joinHBuilderM
   ) where
 
 import Control.Applicative
 
 -- | Apply function to builder
 treeHBuilder :: F.Traversable f => f (HBuilder a b -> HBuilder a' b') -> HBuilder a b -> HBuilder a' (f b')
-treeHBuilder fs h = joinHBuilder $ fmap ($ h) fs
+treeHBuilder fs h = F.sequenceA $ fmap ($ h) fs
 {-# INLINE treeHBuilder #-}