ghc/tests/ghci/ghci005.stdout

   1    ___         ___ _
   2   / _ \ /\  /\/ __(_)
   3  / /_\// /_/ / /  | |      GHC Interactive, version 5.03, for Haskell 98.
   4 / /_\\/ __  / /___| |      http://www.haskell.org/ghc/
   5 \____/\/ /_/\____/|_|      Type :? for help.
   6
   7 Loading package std ... linking ... done.
   8 Prelude> :unset +s +t
   9 Prelude> -- tests for :def, :undef
  10 Prelude> let void m = m >> return ""
  11 Prelude> let echo s = void (putStrLn s)
  12 Prelude> :def echo echo
  13 Prelude> :echo hello, world!
  14 hello, world!
  15 Prelude>
  16 Prelude> let echo s = return (":! echo " ++ map Char.toUpper s)
  17 Prelude> :echo hello, world!
  18 hello, world!
  19 Prelude> :def echo echo
  20 command `echo' is already defined
  21 Prelude> :undef echo
  22 Prelude> :def echo echo
  23 Prelude> :echo hello, world!
  24 HELLO, WORLD!
  25 Prelude> Leaving GHCi.