@@ -29,7 +29,6 @@ import Idris.CmdOptions
29import IRTS.System ( getLibFlags, getIdrisLibDir, getIncFlags )
29import IRTS.System ( getLibFlags, getIdrisLibDir, getIncFlags )
31import Util.DynamicLinker
31import Util.DynamicLinker
34import Pkg.Package
33import Pkg.Package
@@ -39,9 +38,7 @@ import Paths_idris
39-- on with the REPL.
38-- on with the REPL.
41main :: IO ()
40main :: IO ()
43− when isWindows $ do hSetEncoding stdout utf8
44− opts <- runArgParser
41+main = do opts <- runArgParser
45 runMain (runIdris opts)
42 runMain (runIdris opts)
47runIdris :: [Opt] -> Idris ()
44runIdris :: [Opt] -> Idris ()