Update examples

2005-09-03 04:45:14 +00:00
parent 5321754614
commit dff0363224
421 changed files with 19 additions and 9 deletions
--- a/testsuite/hier/hier1/api/API.hs
+++ b/testsuite/hier/hier1/api/API.hs
@ -0,0 +1,16 @@
+--
+-- API for plugin test
+--
+
+module API where
+
+import Modules.Flags as Flags
+
+data Interface = Interface {
+        dbFunc :: Flags.FlagRec -> Int
+}
+
+
+plugin :: Interface
+plugin = Interface { dbFunc = (\x -> 1) }
+