File tree Expand file tree Collapse file tree 3 files changed +4
-4
lines changed Expand file tree Collapse file tree 3 files changed +4
-4
lines changed Original file line number Diff line number Diff line change 2525 "purescript-lists" : " ^0.7.0" ,
2626 "purescript-random" : " ^0.2.0" ,
2727 "purescript-strings" : " ^0.7.0" ,
28- "purescript-transformers" : " ^0.7 .1"
28+ "purescript-transformers" : " ^0.8 .1"
2929 }
3030}
Original file line number Diff line number Diff line change @@ -106,9 +106,9 @@ instance showResult :: Show Result where
106106(<?>) false msg = Failed msg
107107
108108-- | Self-documenting equality assertion
109- (===) :: forall a b . (Eq a , Show a ) => a -> a -> Result
109+ (===) :: forall a . (Eq a , Show a ) => a -> a -> Result
110110(===) a b = a == b <?> show a ++ " /= " ++ show b
111111
112112-- | Self-documenting inequality assertion
113- (/==) :: forall a b . (Eq a , Show a ) => a -> a -> Result
113+ (/==) :: forall a . (Eq a , Show a ) => a -> a -> Result
114114(/==) a b = a /= b <?> show a ++ " == " ++ show b
Original file line number Diff line number Diff line change @@ -161,7 +161,7 @@ evalGen :: forall a. Gen a -> GenState -> a
161161evalGen = evalState
162162
163163-- | Sample a random generator
164- sample :: forall r a . Seed -> Size -> Gen a -> Array a
164+ sample :: forall a . Seed -> Size -> Gen a -> Array a
165165sample seed sz g = evalGen (vectorOf sz g) { newSeed: seed, size: sz }
166166
167167-- | Sample a random generator, using a randomly generated seed
You can’t perform that action at this time.
0 commit comments