Revision 5b11f8db htools/Ganeti/HTools/Program/Hspace.hs
| b/htools/Ganeti/HTools/Program/Hspace.hs | ||
|---|---|---|
| 372 | 372 |
|
| 373 | 373 |
-- | Create an instance from a given spec. |
| 374 | 374 |
instFromSpec :: RSpec -> DiskTemplate -> Int -> Instance.Instance |
| 375 |
instFromSpec spx disk_template su =
|
|
| 375 |
instFromSpec spx = |
|
| 376 | 376 |
Instance.create "new" (rspecMem spx) (rspecDsk spx) |
| 377 |
(rspecCpu spx) Running [] True (-1) (-1) disk_template su
|
|
| 377 |
(rspecCpu spx) Running [] True (-1) (-1) |
|
| 378 | 378 |
|
| 379 | 379 |
-- | Main function. |
| 380 | 380 |
main :: Options -> [String] -> IO () |
Also available in: Unified diff