Revision 2d1708e0 htools/Ganeti/HTools/QC.hs
| b/htools/Ganeti/HTools/QC.hs | ||
|---|---|---|
| 906 | 906 |
-- is zero |
| 907 | 907 |
prop_Loader_mergeData ns = |
| 908 | 908 |
let na = Container.fromList $ map (\n -> (Node.idx n, n)) ns |
| 909 |
in case Loader.mergeData [] [] [] |
|
| 909 |
in case Loader.mergeData [] [] [] []
|
|
| 910 | 910 |
(Loader.emptyCluster {Loader.cdNodes = na}) of
|
| 911 | 911 |
Types.Bad _ -> False |
| 912 | 912 |
Types.Ok (Loader.ClusterData _ nl il _) -> |
Also available in: Unified diff