From 1d2451d109af40453ca220c75df5e411304aa6b5 Mon Sep 17 00:00:00 2001 From: Moritz Lenz Date: Sun, 22 Mar 2009 17:07:37 +0100 Subject: [PATCH] [Test.pm] remove unused function approx() --- Test.pm | 7 ------- 1 file changed, 7 deletions(-) diff --git a/Test.pm b/Test.pm index 715b401afbe..f5860feeccb 100644 --- a/Test.pm +++ b/Test.pm @@ -22,13 +22,6 @@ our $testing_started; ## test functions -# Compare numeric values with approximation -sub approx ($x, $y) { - my $epsilon = 0.00001; - my $diff = abs($x - $y); - ($diff < $epsilon); -} - # you can call die_on_fail; to turn it on and die_on_fail(0) to turn it off sub die_on_fail($fail=1) { $die_on_fail = $fail;