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

b/test/hs/Test/Ganeti/OpCodes.hs
180 180 
          emptyMUD <*> emptyMUD <*> arbitrary <*>
181 181 
          arbitrary  <*> emptyMUD <*> arbitrary <*> arbitrary <*> arbitrary <*>
182 182 
          arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*>
183 
          genMaybe genName <*>
184 
          genMaybe genName
183 
          arbitrary <*> genMaybe genName <*> genMaybe genName
185 184 
      "OP_CLUSTER_REDIST_CONF" -> pure OpCodes.OpClusterRedistConf
186 185 
      "OP_CLUSTER_ACTIVATE_MASTER_IP" ->
187 186 
        pure OpCodes.OpClusterActivateMasterIp

Also available in: Unified diff