X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fghci%2FInteractiveUI.hs;h=2594d13bbeab30d5777fdf65a77b808fe4403bc7;hb=d01159bb27d84898a48ef2783d3cb59d4ce0e30e;hp=6550c6d7e0f205904dfcd7b61b51ab04062af9f5;hpb=f6efe0c76c00807a9dd3fb5649a0938f14923666;p=ghc-hetmet.git diff --git a/compiler/ghci/InteractiveUI.hs b/compiler/ghci/InteractiveUI.hs index 6550c6d..2594d13 100644 --- a/compiler/ghci/InteractiveUI.hs +++ b/compiler/ghci/InteractiveUI.hs @@ -54,7 +54,6 @@ import System.Posix hiding (getEnv) #else import GHC.ConsoleHandler ( flushConsole ) import qualified System.Win32 -import System.FilePath #endif #ifdef USE_READLINE @@ -67,6 +66,7 @@ import System.Console.Readline as Readline import Control.Exception as Exception -- import Control.Concurrent +import System.FilePath import qualified Data.ByteString.Char8 as BS import Data.List import Data.Maybe