add schedule to vicfg

This commit is contained in:
Joey Hess 2013-10-07 17:11:13 -04:00
parent c840d54fab
commit b9375acb18
5 changed files with 47 additions and 12 deletions

View file

@ -43,3 +43,6 @@ instance Arbitrary FileOffset where
nonNegative :: (Num a, Ord a) => Gen a -> Gen a
nonNegative g = g `suchThat` (>= 0)
positive :: (Num a, Ord a) => Gen a -> Gen a
positive g = g `suchThat` (> 0)