summaryrefslogtreecommitdiff
path: root/src/GF.hs
diff options
context:
space:
mode:
authoraarne <unknown>2003-11-07 14:54:44 +0000
committeraarne <unknown>2003-11-07 14:54:44 +0000
commit4c99687f217ce258f821d55e68f5403233f6dea7 (patch)
tree04e2d94654dd4ceb4c5e988f18f979594876c730 /src/GF.hs
parent6ae3322b373c52e59fb34360345d1c1e35049c5f (diff)
Fixed treatment of predefined types (Int, String).
Fixed treatment of predefined types (Int, String). Added treatment of new reserved words to reading old grammars.
Diffstat (limited to 'src/GF.hs')
-rw-r--r--src/GF.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/src/GF.hs b/src/GF.hs
index 122d52766..bdc9a9fea 100644
--- a/src/GF.hs
+++ b/src/GF.hs
@@ -54,10 +54,8 @@ gfInteract st@(env,_) = do
gfInteract st'
Just (ICEditSession,os) ->
editSession (addOptions os opts) env >> gfInteract st
-{- -----
Just (ICTranslateSession,os) ->
translateSession (addOptions os opts) env >> gfInteract st
--}
-- this is a normal command sequence
_ -> do
st' <- execLinesH s cs st