11 lines
264 B
Haskell
Raw Normal View History

2005-04-24 08:51:33 +00:00
--
-- lambda abstraction!
--
--
-- needs unsafeEval because eval has a broken Dynamic check
--
import Eval.Haskell
main = do fn <- unsafeEval "(\\x -> (x,x::Int))" [] :: IO (Maybe (Int -> (Int,Int)))
2005-04-24 08:51:33 +00:00
when (isJust fn) $ putStrLn $ show $ (fromJust fn) 7