Add two missing type declarations.

diff --git a/src/Assertions.hs b/src/Assertions.hs
index 6641e8c988c146026bd79191f8d7f7c4273f64c8..33b79b9b8ba68bb3dabc2002ad284498705bc335 100644 (file)
--- a/src/Assertions.hs
+++ b/src/Assertions.hs
@@ -28,4 +28,5 @@ assertClose preface expected actual =
                 "expected: " ++ show expected ++ "\n but got: " ++ show actual
 
 -- | It's asinine that this doesn't exist already.
+assertTrue :: String -> Bool -> Assertion
 assertTrue = assertBool

diff --git a/src/Tests/Cardinal.hs b/src/Tests/Cardinal.hs
index 450730da0b86eb849a8f8bc3110e9aee635516b0..c3f60e58c274c41555c1f8d4217c9ab890469223 100644 (file)
--- a/src/Tests/Cardinal.hs
+++ b/src/Tests/Cardinal.hs
@@ -75,6 +75,7 @@ test_c_tilde_2100_rotation_correct =
           (1/96)*(FL + BR + FR + BL) +
           (1/192)*(FD + LD + RD + BD)
 
+cardinal_tests :: [Test]
 cardinal_tests = [test_c_tilde_2100_rotation_correct]
 
 -- | A list of all directions, sans the interior and composite types.