Revision 2072221f htools/Ganeti/HTools/Program/Hbal.hs

b/htools/Ganeti/HTools/Program/Hbal.hs
308 308
      Just grp ->
309 309
          case lookup (Group.idx grp) ngroups of
310 310
            Nothing -> do
311
              -- TODO: while this is unlikely to happen, log here the
312
              -- actual group data to help debugging
313
              hPutStrLn stderr "Internal failure, missing group idx"
314
              exitWith $ ExitFailure 1
311
              -- This will only happen if there are no nodes assigned
312
              -- to this group
313
              return (Group.name grp, (Container.empty, Container.empty))
315 314
            Just cdata -> return (Group.name grp, cdata)
316 315

  
317 316
  unless oneline $ printf "Group size %d nodes, %d instances\n"

Also available in: Unified diff