git.iko.soy/typeable/postgresql-simple
on master help sign in
typeable/postgresql-simple/test/WRITING-TESTS
42 lines 1.4 kB history raw
1Do what is EASIEST. Having a test at all is more important than,
2say, pretty failure output.
4To add a test, open Main.hs, and add an entry to tests, e.g.:
6 tests :: [TestEnv -> Test]
7 tests =
8 [ ...
9 , TestLabel "Foo" . testFoo
10 ]
12 testFoo :: TestEnv -> Test
13 testFoo TestEnv{..} = TestCase $ do
14 meaningOfLife @?= 42
15 2013 <- getCurrentYear
16 return ()
18Mnemonic for HUnit @=? and @?= operators:
20 * `?` is the value whose correctness is in question
22 * `=` is the expected value
24If you move a test to a separate module, don't forget to add it to
25"other-modules" in postgresql-simple.cabal . Otherwise, the module will be
26left out of the tarball generated by `cabal sdist`, and tests will fail to
27build when installing from Hackage.
29'TestEnv' (defined in Common.hs) contains information for accessing the
30database. `TestEnv{..}` is a record wildcard which brings the following
31definitions into scope:
33 conn :: Connection
34 withConn :: (Connection -> IO a) -> IO a
36'conn' is a database connection shared by all the tests.
37'withConn' can be used to open additional connections (to the same database).
39'Test' is basically a tree of 'Assertion's, where 'Assertion' is just a type
40alias for IO (). See the [HUnit documentation][1] for more information.
42 [1]: http://hackage.haskell.org/packages/archive/HUnit/latest/doc/html/Test-HUnit-Base.html