GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-22 11:19:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

GF shell: make environment types abstract, comment out some dead code

Browse Source
This commit is contained in:
hallgren
2015-08-11 16:14:38 +00:00
parent 6b90024d09
commit e50f92c41d
4 changed files with 42 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/compiler/GF/Interactive.hs
View File

@@ -5,7 +5,7 @@ import Prelude hiding (putStrLn,print)
import qualified Prelude as P(putStrLn)
import GF.Command.Interpreter(CommandEnv(..),pgfenv,commands,mkCommandEnv,interpretCommandLine)
--import GF.Command.Importing(importSource,importGrammar)
import GF.Command.Commands(flags,options,PGFEnv,pgfEnv,allCommands)
import GF.Command.Commands(flags,options,PGFEnv,pgf,pgfEnv,allCommands)
import GF.Command.Abstract
import GF.Command.Parse(readCommandLine,pCommand)
import GF.Data.Operations (Err(..),chunks,err,raise,done)
@@ -415,7 +415,7 @@ emptyGFEnv = GFEnv emptyGrammar False emptyCommandEnv [] {-0-}
commandEnv pgf = mkCommandEnv (pgfEnv pgf) allCommands
emptyCommandEnv = commandEnv emptyPGF
multigrammar = fst . pgfenv
multigrammar = pgf . pgfenv
wordCompletion gfenv (left,right) = do
case wc_type (reverse left) of