From: Michael Orlitzky Date: Fri, 2 Sep 2011 14:48:40 +0000 (-0400) Subject: Fix a few test warnings. X-Git-Tag: 0.0.1~176 X-Git-Url: https://gitweb.michael.orlitzky.com/?a=commitdiff_plain;h=f902a4d6b47c61ac1ce06ae837d94bda9d2471be;p=spline3.git Fix a few test warnings. --- diff --git a/src/Tests/Tetrahedron.hs b/src/Tests/Tetrahedron.hs index 8f83808..3b511d2 100644 --- a/src/Tests/Tetrahedron.hs +++ b/src/Tests/Tetrahedron.hs @@ -34,7 +34,8 @@ tetrahedron1_geometry_tests = v1 = p1, v2 = p2, v3 = p3, - fv = empty_values } + fv = empty_values, + precomputed_volume = 0 } volume1 :: Assertion volume1 = @@ -68,7 +69,8 @@ tetrahedron2_geometry_tests = v1 = p1, v2 = p2, v3 = p3, - fv = empty_values } + fv = empty_values, + precomputed_volume = 0 } volume1 :: Assertion volume1 = assertEqual "volume1 is correct" True (vol ~= (1/3)) @@ -106,7 +108,8 @@ containment_tests = v1 = p1, v2 = p2, v3 = p3, - fv = empty_values } + fv = empty_values, + precomputed_volume = 0 } contained = contains_point t exterior_point @@ -120,7 +123,8 @@ containment_tests = v1 = p1, v2 = p2, v3 = p3, - fv = empty_values } + fv = empty_values, + precomputed_volume = 0 } contained = contains_point t exterior_point @@ -134,7 +138,8 @@ containment_tests = v1 = p1, v2 = p2, v3 = p3, - fv = empty_values } + fv = empty_values, + precomputed_volume = 0 } contained = contains_point t exterior_point @@ -148,7 +153,8 @@ containment_tests = v1 = p1, v2 = p2, v3 = p3, - fv = empty_values } + fv = empty_values, + precomputed_volume = 0 } contained = contains_point t exterior_point