diff options
| author | simonmar <unknown> | 2004-10-13 08:48:47 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2004-10-13 08:48:47 +0000 |
| commit | 61b570fd5890bc859812faae08ad53657790566c (patch) | |
| tree | 0687150e3950b2076c60d6218e2b15d1a47d456f /ghc | |
| parent | b6d70ef77033fd09f7bfb9c020fd9e40b3dbac29 (diff) | |
| download | haskell-61b570fd5890bc859812faae08ad53657790566c.tar.gz | |
[project @ 2004-10-13 08:48:47 by simonmar]
Undo part of previous commit, a little testing code sneaked in and
broke all the GHCi tests.
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/compiler/ghci/InteractiveUI.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/compiler/ghci/InteractiveUI.hs b/ghc/compiler/ghci/InteractiveUI.hs index 2e9a1a0661..5b3d1e31d0 100644 --- a/ghc/compiler/ghci/InteractiveUI.hs +++ b/ghc/compiler/ghci/InteractiveUI.hs @@ -1,6 +1,6 @@ {-# OPTIONS -#include "Linker.h" #-} ----------------------------------------------------------------------------- --- $Id: InteractiveUI.hs,v 1.177 2004/10/11 14:44:38 simonmar Exp $ +-- $Id: InteractiveUI.hs,v 1.178 2004/10/13 08:48:47 simonmar Exp $ -- -- GHC Interactive User Interface -- @@ -266,7 +266,7 @@ interactiveLoop is_tty show_prompt = do -- read commands from stdin #ifdef USE_READLINE - if (True || is_tty) + if (is_tty) then readlineLoop else fileLoop stdin show_prompt #else |