Revision 3131adc7 htest/Test/Ganeti/OpCodes.hs

b/htest/Test/Ganeti/OpCodes.hs
176 176 
          genMaybe genName <*> genMaybe genNameNE <*> arbitrary <*>
177 177 
          genMaybe genNameNE <*> arbitrary <*> arbitrary <*> emptyMUD
178 178 
      "OP_NODE_QUERY" ->
179 
        OpCodes.OpNodeQuery <$> genFieldsNE <*> arbitrary <*> genNamesNE
179 
        OpCodes.OpNodeQuery <$> genFieldsNE <*> genNamesNE <*> arbitrary
180 180 
      "OP_NODE_QUERYVOLS" ->
181 181 
        OpCodes.OpNodeQueryvols <$> arbitrary <*> genNodeNamesNE
182 182 
      "OP_NODE_QUERY_STORAGE" ->

Also available in: Unified diff