7 lines
208 B
Haskell
Raw Normal View History

import System.Eval.Haskell
2005-04-24 08:51:33 +00:00
main = do m_s <- eval "map toUpper \"haskell\"" ["Data.Char"]
case m_s of
Nothing -> putStrLn "typechecking failed"
Just s -> putStrLn s