Added empty RenameTest

lpsmith · Dec 21, 2011 · f25451e · f25451e
1 parent fd97eee
commit f25451e
Show file tree

Hide file tree

Showing 4 changed files with 23 additions and 9 deletions.
diff --git a/persistent-test/PersistentTest.hs b/persistent-test/PersistentTest.hs
@@ -14,7 +14,11 @@
 {-# LANGUAGE EmptyDataDecls #-}
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE CPP #-}
-module PersistentTest (main') where
+module PersistentTest
+    ( specs
+    , runConn
+    , setup
+    ) where
 
 import Test.HUnit hiding (Test)
 import Test.Hspec.Monadic (Specs, describe, it, hspecX)
@@ -250,11 +254,6 @@ instance Arbitrary PersistValue where
 #endif
 
 
-main' :: IO ()
-main' = do
-  runConn setup
-  hspecX specs
-
 joinGeneric :: PersistBackend b m =>
                (SelectOneMany BackendMonad (Author) (EntryGeneric BackendMonad)
                 -> b m [((Key b (Author), Author),

diff --git a/persistent-test/RenameTest.hs b/persistent-test/RenameTest.hs
@@ -0,0 +1,9 @@
+module RenameTest
+    ( renameSpecs
+    ) where
+
+import Test.Hspec.Monadic
+
+renameSpecs :: Specs
+renameSpecs = do
+    return ()
diff --git a/persistent-test/persistent-test.cabal b/persistent-test/persistent-test.cabal
@@ -20,7 +20,8 @@ library
     ghc-options: -O0
     extra-libraries: sqlite3
     exposed-modules: PersistentTest
-                     Database.Persist.Base
+                     RenameTest
+    other-modules:   Database.Persist.Base
                      Database.Persist.EntityDef
                      Database.Persist.GenericSql
                      Database.Persist.GenericSql.Raw
@@ -71,6 +72,7 @@ test-suite test
 
     build-depends:   base >= 4 && < 5
                    , persistent-test
+                   , hspec
 
     -- these are mutually exclusive options
     -- cpp-options: -DWITH_POSTGRESQL

diff --git a/persistent-test/test/main.hs b/persistent-test/test/main.hs
@@ -1,4 +1,8 @@
-import PersistentTest (main')
+import PersistentTest
+import RenameTest
+import Test.Hspec.Monadic (hspecX)
 
 main :: IO ()
-main = main'
+main = do
+  runConn setup
+  hspecX $ specs >> renameSpecs