Revision 80d7d8a1 htools/Ganeti/HTools/Types.hs

b/htools/Ganeti/HTools/Types.hs
42 42
  , instanceStatusToRaw
43 43
  , RSpec(..)
44 44
  , AllocInfo(..)
45
  , AllocStats
45 46
  , DynUtil(..)
46 47
  , zeroUtil
47 48
  , baseUtil
......
167 168
  , allocInfoDisk  :: Int    -- ^ Disk
168 169
  } deriving (Show, Read, Eq)
169 170

  
171
-- | Currently used, possibly to allocate, unallocable.
172
type AllocStats = (AllocInfo, AllocInfo, AllocInfo)
173

  
170 174
-- | Instance specification type.
171 175
$(THH.buildObject "ISpec" "iSpec"
172 176
  [ THH.renameField "MemorySize" $ THH.simpleField "memory-size" [t| Int |]

Also available in: Unified diff