ghci023.script

putStrLn "-- testing ghci multiline commands :{ .. :}"
putStrLn "-- via stdin"
:{
  let 
  { f 0 = 1
  ; f 1 = w
    where { w = 2 } 
  ; y = 3
  }
:}
print (f 0,f 1,y)
:{
:browse
  Data.Maybe
:}
putStrLn "-- via readFile"
:cmd readFile "ghci023.ghci"