Import hs-plugins cvs

examples/eval/eval_fn/Main.hs

@@ -0,0 +1,10 @@
+--
+-- lambda abstraction!
+--
+--
+-- needs unsafeEval because eval has a broken Dynamic check
+--
+import Eval.Haskell
+
+main = do fn <- unsafeEval "(\\(x::Int) -> (x,x))" [] :: IO (Maybe (Int -> (Int,Int)))
+          when (isJust fn) $ putStrLn $ show $ (fromJust fn) 7

examples/eval/eval_fn/Makefile

@@ -0,0 +1,2 @@
+TOP=../../..
+include ../../eval.mk

examples/eval/eval_fn/expected

@@ -0,0 +1 @@
+(7,7)