Toy scheme REPL implemented in Haskell