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

Fix ghc/ following -dppr-user-length changes

parent fd86aca8
...@@ -37,7 +37,6 @@ import SrcLoc ...@@ -37,7 +37,6 @@ import SrcLoc
import Module import Module
import ObjLink import ObjLink
import Linker import Linker
import StaticFlags
import qualified MonadUtils import qualified MonadUtils
import Exception import Exception
...@@ -259,7 +258,7 @@ printForUserPartWay :: SDoc -> GHCi () ...@@ -259,7 +258,7 @@ printForUserPartWay :: SDoc -> GHCi ()
printForUserPartWay doc = do printForUserPartWay doc = do
unqual <- GHC.getPrintUnqual unqual <- GHC.getPrintUnqual
dflags <- getDynFlags dflags <- getDynFlags
liftIO $ Outputable.printForUserPartWay dflags stdout opt_PprUserLength unqual doc liftIO $ Outputable.printForUserPartWay dflags stdout (pprUserLength dflags) unqual doc
-- | Run a single Haskell expression -- | Run a single Haskell expression
runStmt :: String -> GHC.SingleStep -> GHCi (Maybe GHC.RunResult) runStmt :: String -> GHC.SingleStep -> GHCi (Maybe GHC.RunResult)
......
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