module FRP.Euphoria.Collection
( module FRP.Euphoria.EnumCollection.Lazy
, enummapToCollection
, hashmapToCollection
) where
import Data.EnumMap.Lazy (EnumMap)
import Data.HashMap.Strict (HashMap)
import Data.Hashable (Hashable)
import FRP.Euphoria.EnumCollection.Lazy hiding (mapToCollection)
import qualified FRP.Euphoria.EnumCollection.Lazy as Enum
import qualified FRP.Euphoria.HashCollection.Strict as Hashable
import FRP.Euphoria.Event
enummapToCollection
:: (Eq k, Eq a, Enum k, MonadSignalGen m)
=> Discrete (EnumMap k a)
-> m (Collection k (Discrete a))
enummapToCollection = Enum.mapToCollection
hashmapToCollection
:: (Eq k, Eq a, Hashable k, MonadSignalGen m)
=> Discrete (HashMap k a)
-> m (Collection k (Discrete a))
hashmapToCollection = Hashable.mapToCollection