Revision 94e05c32 Ganeti/HTools/Simu.hs
| b/Ganeti/HTools/Simu.hs | ||
|---|---|---|
| 52 | 52 |
|
| 53 | 53 |
-- | Builds the cluster data from node\/instance files. |
| 54 | 54 |
loadData :: String -- ^ Cluster description in text format |
| 55 |
-> IO (Result (Node.AssocList, Instance.AssocList)) |
|
| 55 |
-> IO (Result (Node.AssocList, Instance.AssocList, [String]))
|
|
| 56 | 56 |
loadData ndata = -- IO monad, just for consistency with the other loaders |
| 57 | 57 |
return $ do |
| 58 | 58 |
(cnt, disk, mem, cpu) <- parseDesc ndata |
| ... | ... | |
| 63 | 63 |
(fromIntegral cpu) False |
| 64 | 64 |
in (idx, Node.setIdx n idx) |
| 65 | 65 |
) [1..cnt] |
| 66 |
return (nodes, []) |
|
| 66 |
return (nodes, [], []) |
|
Also available in: Unified diff