diff options
| author | krasimir <krasimir@chalmers.se> | 2010-02-07 19:23:26 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2010-02-07 19:23:26 +0000 |
| commit | 9564d85fa50b4381b7f12cfa56145d945a11e363 (patch) | |
| tree | 7eaf215e0244787f6a39372a89449b2d08b4ca14 /src | |
| parent | c1d2ed1a7b5bb30c63937acdbb267b45f1f75340 (diff) | |
command cc now works even without loaded grammar. useful for testing closed expressions
Diffstat (limited to 'src')
| -rw-r--r-- | src/compiler/GFI.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler/GFI.hs b/src/compiler/GFI.hs index 2b1d125d9..d53be2195 100644 --- a/src/compiler/GFI.hs +++ b/src/compiler/GFI.hs @@ -17,7 +17,7 @@ import GF.Infra.Dependencies import GF.Infra.CheckM import GF.Infra.UseIO import GF.Infra.Option -import GF.Infra.Modules (greatestResource) +import GF.Infra.Modules (greatestResource, modules, emptyModInfo) import GF.System.Readline import GF.Text.Coding @@ -254,7 +254,7 @@ emptyGFEnv = do #else let coding = UTF_8 #endif - return $ GFEnv emptySourceGrammar (mkCommandEnv coding emptyPGF) [] 0 coding + return $ GFEnv emptySourceGrammar{modules=[(identW,emptyModInfo)]} (mkCommandEnv coding emptyPGF) [] 0 coding encode = encodeUnicode . coding decode = decodeUnicode . coding |