DanielWaterworth/siege — Issue #3: More testing
Author: DanielWaterworth
Created: 2011-12-28 08:50:37+00:00
State: open

There is a distinct lack of testing in the codebase. The plan is to write all of the tests except for a few integration tests in a pure way using quickcheck. This hasn't been possible until now as there has been no way to reduce the monads that operations are actually carried out in to pure functions. Here's an example:

prop_create_get_value a = testRawDBOperation $ do
a' <- createValue a
a'' <- getValue a'
return $ Just a == a''