1 files changed, 0 insertions, 21 deletions
diff --git a/old/testmain.hs b/old/testmain.hs
deleted file mode 100644
index 3f340c2..0000000
--- a/old/testmain.hs
+++ /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
-