Revision dcbcdb58
| b/hbal.hs | ||
|---|---|---|
| 199 | 199 |
then Node.setOffline n True |
| 200 | 200 |
else n) fixed_nl |
| 201 | 201 |
|
| 202 |
when (Container.size il == 0) $ do |
|
| 203 |
(if oneline then |
|
| 204 |
printf "%.8f %d %.8f %8.3f\n" |
|
| 205 |
(0::Double) (0::Integer) (0::Double) (1::Double) |
|
| 206 |
else |
|
| 207 |
printf "Cluster is empty, exiting.\n") |
|
| 208 |
exitWith ExitSuccess |
|
| 209 |
|
|
| 210 |
|
|
| 202 | 211 |
unless oneline $ printf "Loaded %d nodes, %d instances\n" |
| 203 | 212 |
(Container.size nl) |
| 204 | 213 |
(Container.size il) |
Also available in: Unified diff