Revision e7a77eb8 test/hs/Test/Ganeti/OpCodes.hs

b/test/hs/Test/Ganeti/OpCodes.hs
265 265 
          pure emptyJSObject <*> arbitrary <*> pure emptyJSObject <*>
266 266 
          arbitrary <*> genMaybe genNodeNameNE <*> genMaybe genNodeNameNE <*>
267 267 
          genMaybe genNameNE <*> pure emptyJSObject <*> arbitrary <*>
268 
          arbitrary <*> arbitrary <*> arbitrary
268 
          arbitrary <*> arbitrary <*> arbitrary <*> arbitrary
269 269 
      "OP_INSTANCE_GROW_DISK" ->
270 270 
        OpCodes.OpInstanceGrowDisk <$> genFQDN <*> arbitrary <*>
271 271 
          arbitrary <*> arbitrary <*> arbitrary

Also available in: Unified diff