Import hs-plugins cvs

examples/dynload/io/prog/Main.hs

@@ -0,0 +1,12 @@
+
+import Plugins
+import API
+
+main = do
+        m_v   <- dynload "../TestIO.o" ["../api"] 
+                                       ["../../../../plugins.conf.inplace"] "resource_dyn"
+        case m_v of
+                LoadFailure _   -> error "couldn't compile"
+                LoadSuccess _ v -> do 
+                        s <- field v
+                        if s /= [] then print True else print False

examples/dynload/io/prog/expected

@@ -0,0 +1 @@
+True