Revision 2485487d Ganeti/HTools/Cluster.hs
b/Ganeti/HTools/Cluster.hs | ||
---|---|---|
483 | 483 |
|
484 | 484 |
tryAlloc nl _ inst 1 = |
485 | 485 |
let all_nodes = getOnline nl |
486 |
sols = foldl' (\cstate p ->
|
|
487 |
concatAllocs cstate $ allocateOnSingle nl inst p
|
|
486 |
sols = foldl' (\cstate -> |
|
487 |
concatAllocs cstate . allocateOnSingle nl inst
|
|
488 | 488 |
) ([], 0, Nothing) all_nodes |
489 | 489 |
in return sols |
490 | 490 |
|
Also available in: Unified diff