GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-08 02:32:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

show "error" in run interruptibly mode in GFI

Browse Source
This commit is contained in:
aarne
2008-09-09 06:58:38 +00:00
parent 63a706b109
commit 033da07c39
2 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/GFI.hs
View File

@@ -119,7 +119,8 @@ loop opts gfenv0 = do
_ -> do
interpretCommandLine enc env s
loopNewCPU gfenv
gfenv' <- return $ either (const gfenv) id r
-- gfenv' <- return $ either (const gfenv) id r
gfenv' <- either (\e -> (print e >> return gfenv)) return r
loop opts gfenv'
importInEnv :: GFEnv -> Options -> [FilePath] -> IO GFEnv