Revision e7b4d0e1 htools/Ganeti/HTools/QC.hs
| b/htools/Ganeti/HTools/QC.hs | ||
|---|---|---|
| 1027 | 1027 |
forAll (genOnlineNode `suchThat` ((> Types.unitMem) . Node.fMem)) $ \node -> |
| 1028 | 1028 |
-- ab = auto_balance, nb = non-auto_balance |
| 1029 | 1029 |
-- we use -1 as the primary node of the instance |
| 1030 |
let inst' = inst { Instance.pNode = -1, Instance.autoBalance = True }
|
|
| 1030 |
let inst' = inst { Instance.pNode = -1, Instance.autoBalance = True
|
|
| 1031 |
, Instance.diskTemplate = Types.DTDrbd8 } |
|
| 1031 | 1032 |
inst_ab = setInstanceSmallerThanNode node inst' |
| 1032 | 1033 |
inst_nb = inst_ab { Instance.autoBalance = False }
|
| 1033 | 1034 |
-- now we have the two instances, identical except the |
Also available in: Unified diff