summaryrefslogtreecommitdiff
path: root/src/testmain.hs.old
diff options
context:
space:
mode:
Diffstat (limited to 'src/testmain.hs.old')
-rw-r--r--src/testmain.hs.old21
1 files changed, 0 insertions, 21 deletions
diff --git a/src/testmain.hs.old b/src/testmain.hs.old
deleted file mode 100644
index 3f340c2..0000000
--- a/src/testmain.hs.old
+++ /dev/null
@@ -1,21 +0,0 @@
-{-# LANGUAGE ForeignFunctionInterface #-}
-
-
-
-import qualified Storage as Store
-
-
-
-foreign import ccall adainit :: IO Int
-foreign import ccall adafinal :: IO Int
-
-
-
-main = do
- adainit
- s <- Store.createStorage 10 5
- Store.pokePref s 1 2 3
- r <- Store.peekPref s 1 2 3
- putStrLn (show r)
- adafinal
-