7 lines
201 B
Haskell
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
|