fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix: tests

Browse Source
This commit is contained in:
Gregor Kleen 2020-07-14 09:04:16 +02:00
parent 7fadcf52b7
commit daa1f837c7
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
test/Model/TypesSpec.hs
View File

@ -99,6 +99,7 @@ instance Arbitrary UploadSpecificFile where
<$> (pack . getPrintableString <$> arbitrary) <$> (pack . getPrintableString <$> arbitrary)
<*> (pack . getPrintableString <$> arbitrary) <*> (pack . getPrintableString <$> arbitrary)
<*> arbitrary <*> arbitrary
<*> arbitrary
shrink = genericShrink shrink = genericShrink
instance Arbitrary UploadMode where instance Arbitrary UploadMode where