diff options
Diffstat (limited to 'libc/math/gen-libm-test.pl')
-rwxr-xr-x | libc/math/gen-libm-test.pl | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/libc/math/gen-libm-test.pl b/libc/math/gen-libm-test.pl index ae00427a0..c2c22a5b1 100755 --- a/libc/math/gen-libm-test.pl +++ b/libc/math/gen-libm-test.pl @@ -76,15 +76,6 @@ use vars qw ($output_dir $ulps_file $default_ulp); "M_LOG_2_SQRT_PIl" => "log(2*sqrt(pi))", "M_2_SQRT_PIl" => "2 sqrt (pi)", "M_SQRT_PIl" => "sqrt (pi)", - "INVALID_EXCEPTION" => "invalid exception", - "DIVIDE_BY_ZERO_EXCEPTION" => "division by zero exception", - "OVERFLOW_EXCEPTION" => "overflow exception", - "INVALID_EXCEPTION_OK" => "invalid exception allowed", - "DIVIDE_BY_ZERO_EXCEPTION_OK" => "division by zero exception allowed", - "OVERFLOW_EXCEPTION_OK" => "overflow exception allowed", - "EXCEPTIONS_OK" => "exceptions allowed", - "IGNORE_ZERO_INF_SIGN" => "sign of zero/inf not specified", -"INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN" => "invalid exception and sign of zero/inf not specified" ); @@ -220,9 +211,6 @@ sub special_functions { $str = 'sincos (' . &beautify ($args[1]) . ', &sin_res, &cos_res)'; # handle sin $test = $str . ' puts ' . &beautify ($args[2]) . ' in sin_res'; - if ($#args == 4) { - $test .= " plus " . &beautify ($args[4]); - } $cline = " check_float (\"$test\", sin_res, $args[2]"; $cline .= &new_test ($test, $args[4]); @@ -316,11 +304,6 @@ sub parse_args { } - # check for exceptions - if ($current_arg <= $#args) { - $str .= " plus " . &beautify ($args[$current_arg]); - } - # Put the C program line together # Reset some variables to start again $current_arg = 1; |