Revision 446d8827 hbal.hs

b/hbal.hs
196 196 
           printf "Error: failed to load data. Details:\n%s\n" s
197 197 
           exitWith $ ExitFailure 1
198 198 
      )
199 
  let (fix_msgs, fixed_nl) = Cluster.checkData loaded_nl il ktn kti
199 
  let (fix_msgs, fixed_nl) = Loader.checkData loaded_nl il ktn kti
200 200 

  		





  201
  201
  
    
  unless (null fix_msgs || verbose == 0) $ do


  		





  202
  202
  
    
         putStrLn "Warning: cluster has inconsistent data:"


  		












Also available in:
  Unified diff