Skip to content

Commit e178d4a

Browse files
committed
Add a haddock to mkVar
1 parent 5f662ce commit e178d4a

File tree

1 file changed

+4
-0
lines changed
  • quickcheck-dynamic/src/Test/QuickCheck/StateModel

1 file changed

+4
-0
lines changed

quickcheck-dynamic/src/Test/QuickCheck/StateModel/Variables.hs

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -37,6 +37,10 @@ import Test.QuickCheck as QC
3737
newtype Var a = Var Int
3838
deriving (Eq, Ord, Typeable, Data)
3939

40+
-- | Create a fresh symbolic variable with given identifier. While 'Var's are
41+
-- usually created by action generators, this function can be used for example
42+
-- to create a 'Var' in the 'initialState' of a 'StateModel'. A good default
43+
-- value for the identifier is '-1' as this will not be generated otherwise.
4044
mkVar :: Int -> Var a
4145
mkVar = Var
4246

0 commit comments

Comments
 (0)