From 98f311902edf1743743d643fbcc929f77e104109 Mon Sep 17 00:00:00 2001 From: sof Date: Tue, 23 Oct 2001 22:20:33 +0000 Subject: [PATCH] [project @ 2001-10-23 22:20:33 by sof] qualify use of >> when compiling action which turns off buffering for std handles --- ghc/compiler/ghci/InteractiveUI.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/ghci/InteractiveUI.hs b/ghc/compiler/ghci/InteractiveUI.hs index eb608b3..dcdf338 100644 --- a/ghc/compiler/ghci/InteractiveUI.hs +++ b/ghc/compiler/ghci/InteractiveUI.hs @@ -1,6 +1,6 @@ {-# OPTIONS -#include "Linker.h" -#include "SchedAPI.h" #-} ----------------------------------------------------------------------------- --- $Id: InteractiveUI.hs,v 1.99 2001/10/23 17:18:38 sof Exp $ +-- $Id: InteractiveUI.hs,v 1.100 2001/10/23 22:20:33 sof Exp $ -- -- GHC Interactive User Interface -- @@ -150,7 +150,7 @@ interactiveUI cmstate paths cmdline_libs = do dflags <- getDynFlags (cmstate, maybe_hval) - <- cmCompileExpr cmstate dflags "IO.hSetBuffering IO.stdout IO.NoBuffering >> IO.hSetBuffering IO.stderr IO.NoBuffering" + <- cmCompileExpr cmstate dflags "IO.hSetBuffering IO.stdout IO.NoBuffering Prelude.>> IO.hSetBuffering IO.stderr IO.NoBuffering" case maybe_hval of Just hval -> unsafeCoerce# hval :: IO () _ -> panic "interactiveUI:buffering" -- 1.7.10.4