Import hs-plugins cvs

examples/makewith/should_fail_0/prog/Main.hs

@@ -0,0 +1,19 @@
+
+import Plugins
+import API
+
+conf    = "../Plugin.in"
+stub    = "../Plugin.stub"
+
+main = do 
+        status <- makeWith conf stub ["-i../api"]
+        case status of
+                MakeFailure e    -> putStrLn "make failed"
+                MakeSuccess _  o ->  do
+                        m_v   <- load o ["../api"] [] "resource"
+                        v     <- case m_v of
+                                    LoadSuccess _ v -> return v
+                                    _               -> error "load failed"
+                        putStrLn $ (function v)
+                        makeCleaner o
+

examples/makewith/should_fail_0/prog/expected

@@ -0,0 +1 @@
+make failed