move GFC and GFI

2008-05-22 14:39:16 +00:00
parent 2cd5f71178
commit e267c7a8b9
3 changed files with 8 additions and 9 deletions
--- 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