The MaintenanceData data structure has been extended in d8c00f75, however the Arbitrary instance not. Do so now.
Signed-off-by: Klaus Aehlig <[email protected]> --- test/hs/Test/Ganeti/Objects.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/test/hs/Test/Ganeti/Objects.hs b/test/hs/Test/Ganeti/Objects.hs index b97944d..525c96a 100644 --- a/test/hs/Test/Ganeti/Objects.hs +++ b/test/hs/Test/Ganeti/Objects.hs @@ -383,6 +383,7 @@ instance Arbitrary MaintenanceData where <*> arbitrary <*> arbitrary <*> arbitrary + <*> arbitrary -- | Generates a network instance with minimum netmasks of /24. Generating -- bigger networks slows down the tests, because long bit strings are generated -- 2.5.0.rc2.392.g76e840b
