mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-18 17:29:32 -06:00
Rename modules GFI, GFC & GFServer...
... to GF.Interactive, GF.Compiler & GF.Server, respectively.
This commit is contained in:
6
gf.cabal
6
gf.cabal
@@ -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
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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)
|
||||
@@ -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)
|
||||
|
||||
@@ -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)
|
||||
Reference in New Issue
Block a user