Even more Tetrahedron de-dupe.

[spline3.git] / test / TestSuite.hs

diff --git a/test/TestSuite.hs b/test/TestSuite.hs
index 3d058e457c18e9c0906ea90003585514b6eab864..541694cd17980c4a062e82c52caad77a2a5bef0d 100644 (file)
--- a/test/TestSuite.hs
+++ b/test/TestSuite.hs
@@ -55,10 +55,7 @@ tetrahedron_tests =
     testGroup "Tetrahedron Tests" [
       tetrahedron1_geometry_tests,
       tetrahedron2_geometry_tests,
-      tc "doesn't contain point (2)" test_doesnt_contain_point2,
-      tc "doesn't contain point (3)" test_doesnt_contain_point3,
-      tc "doesn't contain point (4)" test_doesnt_contain_point4,
-      tc "doesn't contain point (5)" test_doesnt_contain_point5 ]
+      containment_tests ]
 
 -- | Defined so that my test names fit on one line.
 tp :: Test.QuickCheck.Testable a => Test.Framework.TestName -> a -> Test.Framework.Test