Revision 7345b69b htools/Ganeti/HTools/IAlloc.hs
| b/htools/Ganeti/HTools/IAlloc.hs | ||
|---|---|---|
| 35 | 35 |
import Control.Monad |
| 36 | 36 |
import Text.JSON (JSObject, JSValue(JSArray), |
| 37 | 37 |
makeObj, encodeStrict, decodeStrict, fromJSObject, showJSON) |
| 38 |
import System (exitWith, ExitCode(..))
|
|
| 38 |
import System.Exit
|
|
| 39 | 39 |
import System.IO |
| 40 | 40 |
|
| 41 | 41 |
import qualified Ganeti.HTools.Cluster as Cluster |
Also available in: Unified diff