Revision 8d66f58a htools/Ganeti/HTools/QC.hs

b/htools/Ganeti/HTools/QC.hs
227 227 
        "OP_INSTANCE_FAILOVER" ->
228 228 
          liftM2 OpCodes.OpFailoverInstance arbitrary arbitrary
229 229 
        "OP_INSTANCE_MIGRATE" ->
230 
          liftM3 OpCodes.OpMigrateInstance arbitrary arbitrary arbitrary
230 
          liftM4 OpCodes.OpMigrateInstance arbitrary arbitrary arbitrary
231 
          arbitrary
231 232 
        _ -> fail "Wrong opcode")
232 233 

  		





  233
  234
  
    
instance Arbitrary Jobs.OpStatus where


  		












Also available in:
  Unified diff