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
|