mirrors/IHaskell
1
0
Fork 0
mirror of https://github.com/IHaskell/IHaskell.git synced 2025-04-19 12:56:08 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #411 from gibiansky/safely-set-flags

Browse Source 
Do not crash on errors when setting flags, fixes #370
This commit is contained in:
Andrew Gibiansky 2015-03-06 14:07:41 -08:00
commit 3d167925c6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/IHaskell/Eval/Evaluate.hs
View File

@ -419,7 +419,7 @@ evalCommand _ (Module contents) state = wrapExecution state $ do
Nothing -> doLoadModule modName modName
-- | Directives set via `:set`.
evalCommand output (Directive SetDynFlag flags) state =
evalCommand output (Directive SetDynFlag flags) state = safely state $
case words flags of
[] -> do
flags <- getSessionDynFlags