Revision 7345b69b htools/Ganeti/HTools/Program/Hbal.hs
b/htools/Ganeti/HTools/Program/Hbal.hs | ||
---|---|---|
31 | 31 |
import Data.List |
32 | 32 |
import Data.Maybe (isJust, isNothing, fromJust) |
33 | 33 |
import Data.IORef |
34 |
import System (exitWith, ExitCode(..)) |
|
34 |
import System.Environment (getArgs) |
|
35 |
import System.Exit |
|
35 | 36 |
import System.IO |
36 | 37 |
import System.Posix.Process |
37 | 38 |
import System.Posix.Signals |
38 |
import qualified System |
|
39 | 39 |
|
40 | 40 |
import Text.Printf (printf, hPrintf) |
41 | 41 |
|
... | ... | |
340 | 340 |
-- | Main function. |
341 | 341 |
main :: IO () |
342 | 342 |
main = do |
343 |
cmd_args <- System.getArgs
|
|
343 |
cmd_args <- getArgs |
|
344 | 344 |
(opts, args) <- parseOpts cmd_args "hbal" options |
345 | 345 |
|
346 | 346 |
unless (null args) $ do |
Also available in: Unified diff