diff options
| author | sewardj <unknown> | 2001-08-09 10:55:53 +0000 |
|---|---|---|
| committer | sewardj <unknown> | 2001-08-09 10:55:53 +0000 |
| commit | 70b37ccbd9d1448f9a8311f2ead5eff35d919b07 (patch) | |
| tree | be4d449b5426f3dd5a617facc2b22097cb634092 | |
| parent | 1222d1f1cd463d17cfd3109c5da8234b63117bf1 (diff) | |
| download | haskell-70b37ccbd9d1448f9a8311f2ead5eff35d919b07.tar.gz | |
[project @ 2001-08-09 10:55:53 by sewardj]
Change "dunno, mate" into something a bit more helpful.
| -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 cf749d2abc..e5a950a05f 100644 --- a/ghc/compiler/ghci/InteractiveUI.hs +++ b/ghc/compiler/ghci/InteractiveUI.hs @@ -1,5 +1,5 @@ ----------------------------------------------------------------------------- --- $Id: InteractiveUI.hs,v 1.83 2001/07/24 04:41:40 ken Exp $ +-- $Id: InteractiveUI.hs,v 1.84 2001/08/09 10:55:53 sewardj Exp $ -- -- GHC Interactive User Interface -- @@ -369,7 +369,7 @@ help :: String -> GHCi () help _ = io (putStr helpText) info :: String -> GHCi () -info "" = do io (putStr "dunno, mate") +info "" = throwDyn (CmdLineError "syntax: `:i <thing-you-want-info-about>'") info s = do let names = words s st <- getGHCiState |