reorganize the directories under src, and rescue the JavaScript interpreter from deprecated

1 files changed, 0 insertions, 45 deletions

diff --git a/src/GF.hs b/src/GF.hs
deleted file mode 100644
index 32a95ca1f..000000000
--- a/src/GF.hs
+++ /dev/null
@@ -1,45 +0,0 @@
-{-# OPTIONS -cpp #-}
-module Main where
-
-import GFC
-import GFI
-import GF.Data.ErrM
-import GF.Infra.Option
-import GF.Infra.UseIO
-import Paths_gf
-
-import Data.Version
-import System.Directory
-import System.Environment (getArgs)
-import System.Exit
-import System.IO
-#ifdef mingw32_HOST_OS
-import System.Win32.Console
-import System.Win32.NLS
-#endif
-
-main :: IO ()
-main = do
-#ifdef mingw32_HOST_OS
-  codepage <- getACP
-  setConsoleCP codepage
-  setConsoleOutputCP codepage
-#endif
-  args <- getArgs
-  case parseOptions args of
-    Ok (opts,files) -> do curr_dir <- getCurrentDirectory
-                          lib_dir  <- getLibraryDirectory opts
-                          mainOpts (fixRelativeLibPaths curr_dir lib_dir opts) files
-    Bad err         -> do hPutStrLn stderr err
-                          hPutStrLn stderr "You may want to try --help."
-                          exitFailure
-
-mainOpts :: Options -> [FilePath] -> IO ()
-mainOpts opts files = 
-    case flag optMode opts of
-      ModeVersion     -> putStrLn $ "Grammatical Framework (GF) version " ++ showVersion version
-      ModeHelp        -> putStrLn helpMessage
-      ModeInteractive -> mainGFI opts files
-      ModeRun         -> mainRunGFI opts files
-      ModeCompiler    -> dieIOE (mainGFC opts files)
-