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 25
25
"purescript-lists" : " ^0.7.0" ,
26
26
"purescript-random" : " ^0.2.0" ,
27
27
"purescript-strings" : " ^0.7.0" ,
28
- "purescript-transformers" : " ^0.7 .1"
28
+ "purescript-transformers" : " ^0.8 .1"
29
29
}
30
30
}
Original file line number Diff line number Diff line change @@ -106,9 +106,9 @@ instance showResult :: Show Result where
106
106
(<?>) false msg = Failed msg
107
107
108
108
-- | 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
110
110
(===) a b = a == b <?> show a ++ " /= " ++ show b
111
111
112
112
-- | 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
114
114
(/==) 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
161
161
evalGen = evalState
162
162
163
163
-- | 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
165
165
sample seed sz g = evalGen (vectorOf sz g) { newSeed: seed, size: sz }
166
166
167
167
-- | Sample a random generator, using a randomly generated seed
You can’t perform that action at this time.
0 commit comments