Rename modules GFI, GFC & GFServer...

... to GF.Interactive, GF.Compiler & GF.Server, respectively.

4 files changed, 6 insertions, 7 deletions

diff --git a/src/compiler/GF.hs b/src/compiler/GF.hs
index 68e43b6ca..cb63cadbe 100644
--- a/src/compiler/GF.hs
+++ b/src/compiler/GF.hs
@@ -1,7 +1,7 @@
 module Main where
 
-import GFC
-import GFI
+import GF.Compiler
+import GF.Interactive
 import GF.Data.ErrM
 import GF.Infra.Option
 import GF.Infra.UseIO
diff --git a/src/compiler/GFC.hs b/src/compiler/GF/Compiler.hs
index 4b88bd998..3be8c6e14 100644
--- a/src/compiler/GFC.hs
+++ b/src/compiler/GF/Compiler.hs
@@ -1,5 +1,4 @@
-module GFC (mainGFC, writePGF) where
--- module Main where
+module GF.Compiler (mainGFC, writePGF) where
 
 import PGF
 import PGF.Internal(concretes,optimizePGF,unionPGF)
diff --git a/src/compiler/GFI.hs b/src/compiler/GF/Interactive.hs
index 44f978cb3..745f64f84 100644
--- a/src/compiler/GFI.hs
+++ b/src/compiler/GF/Interactive.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE ScopedTypeVariables, CPP #-}
 -- | GF interactive mode
-module GFI (mainGFI,mainRunGFI,mainServerGFI) where
+module GF.Interactive (mainGFI,mainRunGFI,mainServerGFI) where
 import Prelude hiding (putStrLn,print)
 import qualified Prelude as P(putStrLn)
 import GF.Command.Interpreter(CommandEnv(..),commands,mkCommandEnv,emptyCommandEnv,interpretCommandLine)
@@ -45,7 +45,7 @@ import Control.Monad
 import GF.Text.Pretty (render)
 import qualified GF.System.Signal as IO(runInterruptibly)
 #ifdef SERVER_MODE
-import GFServer(server)
+import GF.Server(server)
 #endif
 import GF.System.Console(changeConsoleEncoding)
 
diff --git a/src/compiler/GFServer.hs b/src/compiler/GF/Server.hs
index fbcca3d94..0fc7f0388 100644
--- a/src/compiler/GFServer.hs
+++ b/src/compiler/GF/Server.hs
@@ -1,6 +1,6 @@
 -- | GF server mode
 {-# LANGUAGE CPP #-}
-module GFServer(server) where
+module GF.Server(server) where
 import Data.List(partition,stripPrefix,isInfixOf)
 import qualified Data.Map as M
 import Control.Monad(when)