2005-04-24 10:06:44 +00:00

11 lines
264 B
Haskell

--
-- 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)))
when (isJust fn) $ putStrLn $ show $ (fromJust fn) 7