Revision c8c071cb src/Ganeti/HTools/Backend/IAlloc.hs

b/src/Ganeti/HTools/Backend/IAlloc.hs
147 147 
  dtotal <- lvextract 0.0 "total_disk"
148 148 
  dfree  <- lvextract 0 "free_disk"
149 149 
  ctotal <- lvextract 0.0 "total_cpus"
150 
  let node = Node.create n mtotal mnode mfree dtotal dfree ctotal (not live)
151 
             sptotal spfree gidx excl_stor
150 
  cnos <- lvextract 0 "reserved_cpus"
151 
  let node = Node.create n mtotal mnode mfree dtotal dfree ctotal cnos
152 
             (not live) sptotal spfree gidx excl_stor
152 153 
  return (n, node)
153 154 

  		





  154
  155
  
    
-- | Parses a group as found in the cluster group list.


  		












Also available in:
  Unified diff