barecheck-0.2.0.0: lib/Data/Sequence/Generators.hs

module Data.Sequence.Generators where

import Data.Sequence
import Test.QuickCheck
import Prelude hiding (seq)

seq :: Gen a -> Gen (Seq a)
seq = fmap fromList . listOf