Skip to content

Commit a957f17

Browse files
committed
fix
1 parent 961d7ef commit a957f17

File tree

2 files changed

+4
-3
lines changed

2 files changed

+4
-3
lines changed

.gitignore

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -4,3 +4,4 @@ dist
44
.cabal-sandbox/
55
cabal.sandbox.config
66
dist-newstyle
7+
TAGS

src/Test/QuickCheck/Arbitrary/Generic.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -74,7 +74,7 @@ data R2 = R2 R1
7474
deriving Arbitrary via (GenericArbitrary R2)
7575
@
7676
77-
This code will compile and the @arbitrary@ generated will always hand. Yes,
77+
This code will compile and the @arbitrary@ generated will always hang. Yes,
7878
there is a problem with mutually recursive types.
7979
8080
Now lets see an example of datatype with parameters
@@ -90,7 +90,7 @@ instance (Arbitrary a) => Arbitrary (A a) where
9090
shrink = genericShrink
9191
@
9292
93-
It should work from first glance, but on compilation it will throw an error:
93+
It should work from first glance, but when compile it will throw an error:
9494
9595
@
9696
• Could not deduce (Test.QuickCheck.Arbitrary.Generic.GArbitrary
@@ -120,7 +120,7 @@ instance (Arg (A a) a, Arbitrary a) => Arbitrary (A a) where
120120
shrink = genericShrink
121121
@
122122
123-
Now everything compiles.
123+
Now everything compiles and works as expected.
124124
125125
-}
126126

0 commit comments

Comments
 (0)