Rename modules GFI, GFC & GFServer...

... to GF.Interactive, GF.Compiler & GF.Server, respectively.
This commit is contained in:
hallgren
2014-10-15 21:04:29 +00:00
parent 393dde2eb9
commit b70dba87ba
5 changed files with 9 additions and 10 deletions

View File

@@ -158,7 +158,7 @@ Executable gf
build-depends: httpd-shed>=0.4.0.2, network>=2.3 && <2.6, json, cgi
-- ,silently
cpp-options: -DSERVER_MODE
other-modules: GFServer
other-modules: GF.Server
hs-source-dirs: src/server src/server/transfer src/example-based
if flag(c-runtime)
@@ -251,8 +251,8 @@ Executable gf
GF.Compile.PGFtoJS
GF.Compile
GF.Quiz
GFC
GFI
GF.Compiler
GF.Interactive
if flag(interrupt)
cpp-options: -DUSE_INTERRUPT

View File

@@ -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

View File

@@ -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)

View File

@@ -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)

View File

@@ -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)