Skip to content

Commit

Permalink
Release v0.9.0.0
Browse files Browse the repository at this point in the history
  • Loading branch information
isovector committed Dec 4, 2021
1 parent ea1353d commit fd62989
Show file tree
Hide file tree
Showing 4 changed files with 14 additions and 2 deletions.
6 changes: 6 additions & 0 deletions ChangeLog.md
Original file line number Diff line number Diff line change
@@ -1,5 +1,11 @@
# Changelog for polysemy-check

## v0.9.0.0 (2021-12-03)

- `prepropLaw` now generates a new `Law` record, allowing for better control
over the program prelude and postludes
- `prepropLaw` now takes a labeler, for running QuickCheck coverage

## v0.8.1.0 (2021-10-21)

- Added a new function, `prepropAllCommutative` which ensures every effect
Expand Down
2 changes: 1 addition & 1 deletion package.yaml
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
name: polysemy-check
version: 0.8.1.0
version: 0.9.0.0
github: "polysemy-research/polysemy-check"
license: BSD3
author: "Sandy Maguire"
Expand Down
2 changes: 1 addition & 1 deletion polysemy-check.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ cabal-version: 1.12
-- see: https://github.com/sol/hpack

name: polysemy-check
version: 0.8.1.0
version: 0.9.0.0
synopsis: QuickCheck for Polysemy
description: Please see the README on GitHub at <https://github.com/polysemy-research/polysemy-check#readme>
category: Polysemy
Expand Down
6 changes: 6 additions & 0 deletions src/Polysemy/Check.hs
Original file line number Diff line number Diff line change
Expand Up @@ -131,6 +131,8 @@ instance (ArbitraryEff r r, ArbitraryEff es r, ArbitraryEff '[e] r, AllCommutati
------------------------------------------------------------------------------
-- | Data structure containing programs that should be equal, and under which
-- circumstances.
--
-- @since 0.9.0.0
data Law r z a = Law
{ lawLhs :: Sem r a
-- ^ 'lawLhs' and 'lawRhs' are being asserted as equal.
Expand All @@ -148,6 +150,8 @@ data Law r z a = Law
------------------------------------------------------------------------------
-- | Like 'Law', but for the common case when you don't need a custom prelude
-- or postlude.
--
-- @since 0.9.0.0
simpleLaw :: Sem r a -> Sem r a -> Law r () a
simpleLaw lhs rhs = Law lhs rhs [] []

Expand Down Expand Up @@ -230,6 +234,8 @@ maybeOneof res = do

------------------------------------------------------------------------------
-- | Label an example with its data constructor.
--
-- @since 0.9.0.0
constructorLabel :: Data a => a -> String
constructorLabel = showConstr . toConstr

Expand Down

0 comments on commit fd62989

Please sign in to comment.