diff options
Diffstat (limited to 'src-3.0/GF.hs')
| -rw-r--r-- | src-3.0/GF.hs | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/src-3.0/GF.hs b/src-3.0/GF.hs index 70fddcd67..038d034d6 100644 --- a/src-3.0/GF.hs +++ b/src-3.0/GF.hs @@ -1,14 +1,13 @@ module Main where -import GF.Devel.GFC -import GF.Devel.GFI +import GFC +import GFI -import System (getArgs) +import System.Environment (getArgs) main :: IO () main = do - xx <- getArgs - case xx of + args <- getArgs + case args of "--batch":args -> mainGFC args - _ -> mainGFI xx - + _ -> mainGFI args |