Update examples

testsuite/load/load_0/prog/Main.hs

@@ -0,0 +1,11 @@
+
+import System.Plugins
+import API
+
+main = do
+        m_v <- load_ "../Test.o" ["../api"] "resource"
+        v <- case m_v of
+                LoadFailure _   -> error "load failed"
+                LoadSuccess _ v -> return v
+        let s = field v
+        print s

testsuite/load/load_0/prog/expected

@@ -0,0 +1 @@
+"success"