Commit b85bac5e authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Flatten flags for ghci's :show

parent 0e6ff027
......@@ -1580,7 +1580,7 @@ optToStr RevertCAFs = "r"
-- code for `:show'
showCmd :: String -> GHCi ()
showCmd str = do
showCmd str = withFlattenedDynflags $ do
st <- getGHCiState
case words str of
["args"] -> io $ putStrLn (show (args st))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment