on master help sign in
Fix silly arbitrary text generation bug.
fc53b6cBryan O'Sullivan
tests/QuickCheckUtils.hs+1−1
@@ -37,7 +37,7 @@ instance Arbitrary Word16 where
37 coarbitrary c = variant (fromEnum c `rem` 4)
37 coarbitrary c = variant (fromEnum c `rem` 4)
38
38
39instance Arbitrary Char where
39instance Arbitrary Char where
40− arbitrary = oneof [choose ('\0','\55295'), choose ('\57334','\1114111')]
40+ arbitrary = oneof [choose ('\0','\55295'), choose ('\57344','\1114111')]
41 coarbitrary c = variant (fromEnum c `rem` 4)
41 coarbitrary c = variant (fromEnum c `rem` 4)
42
42
43instance Arbitrary T.Text where
43instance Arbitrary T.Text where