From: Michael Orlitzky Date: Fri, 2 Sep 2011 13:16:16 +0000 (-0400) Subject: Add a new test group, slow_tests, that is run after all of the others. X-Git-Tag: 0.0.1~180 X-Git-Url: https://gitweb.michael.orlitzky.com/?a=commitdiff_plain;h=70120aad0e7b2126b81e8d444fd7591c4badd45f;p=spline3.git Add a new test group, slow_tests, that is run after all of the others. --- diff --git a/test/TestSuite.hs b/test/TestSuite.hs index 82e2870..66f592b 100644 --- a/test/TestSuite.hs +++ b/test/TestSuite.hs @@ -41,8 +41,7 @@ grid_tests = tc "tetrahedra collision test isn't too sensitive" test_tetrahedra_collision_sensitivity, tc "trilinear reproduced" test_trilinear_reproduced, - tc "zeros reproduced" test_zeros_reproduced, - tc "trilinear9x9x9 reproduced" test_trilinear9x9x9_reproduced ] + tc "zeros reproduced" test_zeros_reproduced ] misc_tests :: Test.Framework.Test @@ -206,7 +205,16 @@ tetrahedron_properties = tp "y rotation doesn't affect right" prop_y_rotation_doesnt_affect_right, tp "z rotation doesn't affect top" prop_z_rotation_doesnt_affect_top, tp "z rotation doesn't affect down" prop_z_rotation_doesnt_affect_down ] - + + +-- Do the slow tests last so we can stop paying attention. +slow_tests :: Test.Framework.Test +slow_tests = + testGroup "Slow Tests" [ + tp "cube indices within bounds" prop_cube_indices_never_go_out_of_bounds, + tc "trilinear9x9x9 reproduced" test_trilinear9x9x9_reproduced ] + + tests :: [Test.Framework.Test] tests = [ cardinal_tests, function_values_tests, @@ -222,4 +230,5 @@ tests = [ cardinal_tests, -- p78_25_properties, p79_26_properties, p79_27_properties, - p79_28_properties ] + p79_28_properties, + slow_tests ]