summaryrefslogtreecommitdiff
path: root/src/compiler/GF/Main.hs
diff options
context:
space:
mode:
authorJohn J. Camilleri <john@digitalgrammars.com>2022-06-18 21:09:23 +0200
committerJohn J. Camilleri <john@digitalgrammars.com>2022-06-18 21:09:23 +0200
commit65308861bc6cd899d0fcf3695a382e8016d40a05 (patch)
tree50bfb648eb6cd32cf6798d5700c6bfa4199665c1 /src/compiler/GF/Main.hs
parent9f2a3de7a3cc0db2db741b7f9766681a95e729ff (diff)
parentb7672b67a39fb46f3ba8dbacca96babb04fca82c (diff)
Merge branch 'master' of github.com:GrammaticalFramework/gf-core
Diffstat (limited to 'src/compiler/GF/Main.hs')
-rw-r--r--src/compiler/GF/Main.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/compiler/GF/Main.hs b/src/compiler/GF/Main.hs
index 7d4500c7b..1b90430d6 100644
--- a/src/compiler/GF/Main.hs
+++ b/src/compiler/GF/Main.hs
@@ -16,6 +16,7 @@ import Data.Version
import System.Directory
import System.Environment (getArgs)
import System.Exit
+import GHC.IO.Encoding
-- import GF.System.Console (setConsoleEncoding)
-- | Run the GF main program, taking arguments from the command line.
@@ -23,6 +24,7 @@ import System.Exit
-- Run @gf --help@ for usage info.
main :: IO ()
main = do
+ setLocaleEncoding utf8
-- setConsoleEncoding
uncurry mainOpts =<< getOptions