Revision 71375ef7 htools/Ganeti/HTools/Simu.hs

b/htools/Ganeti/HTools/Simu.hs
91 91 
            $ zip [1..] nodes'
92 92 
      ktg = map (\g -> (Group.idx g, g)) groups
93 93 
  return (ClusterData (Container.fromList ktg)
94 
                      (Container.fromList ktn) Container.empty [])
94 
                      (Container.fromList ktn) Container.empty [] defIPolicy)
95 95 

  		





  96
  96
  
    
-- | Builds the cluster data from node\/instance files.


  		





  97
  97
  
    
loadData :: [String] -- ^ Cluster description in text format


  		












Also available in:
  Unified diff