mirror of
https://github.com/barrucadu/dejafu.git
synced 2024-12-18 19:11:37 +03:00
Remove some redundant constraints
This commit is contained in:
parent
9e7e460ab0
commit
81ff175f6d
@ -6,6 +6,17 @@ All notable changes to this project will be documented in this file.
|
||||
This project is versioned according to the [Package Versioning Policy](https://pvp.haskell.org), the
|
||||
*de facto* standard Haskell versioning scheme.
|
||||
|
||||
unreleased
|
||||
----------
|
||||
|
||||
### Test.DejaFu.Refinement
|
||||
|
||||
- Removed unnecessary typeclass constraints from `check`, `check'`, `checkFor`, and
|
||||
`counterExamples`.
|
||||
|
||||
|
||||
---------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
0.7.0.1 [2017-06-09] (git tag: [dejafu-0.7.0.1][])
|
||||
-------
|
||||
|
@ -274,7 +274,7 @@ data FailedProperty o x
|
||||
-- variable assignments.
|
||||
--
|
||||
-- @since 0.7.0.0
|
||||
check :: (Testable p, Listable (X p), Eq (X p), Show (X p), Show (O p))
|
||||
check :: (Testable p, Listable (X p), Show (X p), Show (O p))
|
||||
=> p
|
||||
-- ^ The property to check.
|
||||
-> IO Bool
|
||||
@ -296,7 +296,7 @@ check p = do
|
||||
-- counterexample.
|
||||
--
|
||||
-- @since 0.7.0.0
|
||||
check' :: (Testable p, Listable (X p), Eq (X p), Show (X p), Show (O p))
|
||||
check' :: (Testable p, Listable (X p))
|
||||
=> p
|
||||
-- ^ The property to check.
|
||||
-> IO (Maybe (FailedProperty (O p) (X p)))
|
||||
@ -309,7 +309,7 @@ check' = checkFor 10 100
|
||||
-- @listToMaybe@ composed with @counterExamples@.
|
||||
--
|
||||
-- @since 0.7.0.0
|
||||
checkFor :: (Testable p, Listable (X p), Eq (X p), Show (X p))
|
||||
checkFor :: (Testable p, Listable (X p))
|
||||
=> Int
|
||||
-- ^ Number of seed values per variable-assignment.
|
||||
-> Int
|
||||
@ -332,7 +332,7 @@ checkFor sn vn p = do
|
||||
-- | Find all counterexamples up to a limit.
|
||||
--
|
||||
-- @since 0.7.0.0
|
||||
counterExamples :: (Testable p, Listable (X p), Eq (X p))
|
||||
counterExamples :: (Testable p, Listable (X p))
|
||||
=> Int
|
||||
-- ^ Number of seed values per variable-assignment.
|
||||
-> Int
|
||||
|
Loading…
Reference in New Issue
Block a user