2005-04-24 08:51:33 +00:00

7 lines
201 B
Haskell

import Eval.Haskell
main = do m_s <- eval "map toUpper \"haskell\"" ["Data.Char"]
case m_s of
Nothing -> putStrLn "typechecking failed"
Just s -> putStrLn s