Revision f1f6f117 test/hs/Test/Ganeti/Utils.hs
b/test/hs/Test/Ganeti/Utils.hs | ||
---|---|---|
207 | 207 |
zip numbers names) |
208 | 208 |
] |
209 | 209 |
|
210 |
-- | Tests 'rstripSpace'.
|
|
210 |
-- | Tests 'rStripSpace'.
|
|
211 | 211 |
prop_rStripSpace :: NonEmptyList Char -> Property |
212 | 212 |
prop_rStripSpace (NonEmpty str) = |
213 | 213 |
forAll (resize 50 $ listOf1 (arbitrary `suchThat` isSpace)) $ \whitespace -> |
Also available in: Unified diff