Revision 487e1962 htools/Ganeti/HTools/QC.hs
b/htools/Ganeti/HTools/QC.hs | ||
---|---|---|
809 | 809 |
|
810 | 810 |
prop_Text_NodeLSIdempotent node = |
811 | 811 |
(Text.loadNode defGroupAssoc. |
812 |
Utils.sepSplit '|' . Text.serializeNode defGroupList) n == |
|
812 |
Utils.sepSplit '|' . Text.serializeNode defGroupList) n ==?
|
|
813 | 813 |
Just (Node.name n, n) |
814 | 814 |
-- override failN1 to what loadNode returns by default |
815 |
where n = node { Node.failN1 = True, Node.offline = False
|
|
816 |
, Node.iPolicy = Types.defIPolicy }
|
|
815 |
where n = Node.setPolicy Types.defIPolicy $
|
|
816 |
node { Node.failN1 = True, Node.offline = False }
|
|
817 | 817 |
|
818 | 818 |
prop_Text_ISpecIdempotent ispec = |
819 | 819 |
case Text.loadISpec "dummy" . Utils.sepSplit ',' . |
... | ... | |
942 | 942 |
where newnode = Node.setXmem node xm |
943 | 943 |
|
944 | 944 |
prop_Node_setMcpu node mc = |
945 |
Node.mCpu newnode ==? mc
|
|
945 |
Types.iPolicyVcpuRatio (Node.iPolicy newnode) ==? mc
|
|
946 | 946 |
where newnode = Node.setMcpu node mc |
947 | 947 |
|
948 | 948 |
-- | Check that an instance add with too high memory or disk will be |
Also available in: Unified diff