summaryrefslogtreecommitdiff
path: root/libc/math/gen-libm-test.pl
diff options
context:
space:
mode:
authorjoseph <joseph@7b3dc134-2b1b-0410-93df-9e9f96275f8d>2013-05-18 00:12:09 +0000
committerjoseph <joseph@7b3dc134-2b1b-0410-93df-9e9f96275f8d>2013-05-18 00:12:09 +0000
commitf9b341f7c8c64a0df8707b3cf29b425a25a52d12 (patch)
tree21d8ab56f46e274f911d3af1e34d578b70878f3d /libc/math/gen-libm-test.pl
parent037ebec6461ad978f9a2f44ca49f1d7d7b858e2d (diff)
* configure.in, math/Makefile, math/gen-libm-test.pl,
math/libm-test.inc, option-groups.def, option-groups.defaults, sysdeps/ieee754/ldbl-128/s_erfl.c, sysdeps/ieee754/ldbl-128/s_log1pl.c, sysdeps/ieee754/ldbl-128ibm/s_erfl.c, sysdeps/ieee754/ldbl-128ibm/s_log1pl.c, sysdeps/ieee754/ldbl-96/s_erfl.c, sysdeps/ieee754/ldbl-opt/s_atan.c, sysdeps/ieee754/ldbl-opt/s_sin.c, sysdeps/ieee754/ldbl-opt/s_tan.c: Revert OPTION_EGLIBC_LIBM_BIG support. * configure: Regenerated. * math/test-dbl-wrap.c, sysdeps/ieee754/dbl-wrap, sysdeps/ieee754/ldbl-wrap: Remove. git-svn-id: svn://svn.eglibc.org/trunk@23097 7b3dc134-2b1b-0410-93df-9e9f96275f8d
Diffstat (limited to 'libc/math/gen-libm-test.pl')
-rwxr-xr-xlibc/math/gen-libm-test.pl24
1 files changed, 9 insertions, 15 deletions
diff --git a/libc/math/gen-libm-test.pl b/libc/math/gen-libm-test.pl
index d422770c4..aa60d9dba 100755
--- a/libc/math/gen-libm-test.pl
+++ b/libc/math/gen-libm-test.pl
@@ -47,7 +47,7 @@ use vars qw (%results);
use vars qw (@tests @functions);
use vars qw ($count);
use vars qw (%beautify @all_floats);
-use vars qw ($output_dir $ulps_file $default_ulp);
+use vars qw ($output_dir $ulps_file);
# all_floats is sorted and contains all recognised float types
@all_floats = ('double', 'float', 'idouble',
@@ -85,12 +85,11 @@ use vars qw ($output_dir $ulps_file $default_ulp);
# h: help
# o: output-directory
# n: generate new ulps file
-use vars qw($opt_u $opt_h $opt_o $opt_n $opt_d);
-getopts('u:o:d:nh');
+use vars qw($opt_u $opt_h $opt_o $opt_n);
+getopts('u:o:nh');
$ulps_file = 'libm-test-ulps';
$output_dir = '';
-$default_ulp = '0';
if ($opt_h) {
print "Usage: gen-libm-test.pl [OPTIONS]\n";
@@ -98,13 +97,11 @@ if ($opt_h) {
print " -o DIR directory where generated files will be placed\n";
print " -n only generate sorted file NewUlps from libm-test-ulps\n";
print " -u FILE input file with ulps\n";
- print " -d NUM set the default value for ulp to NUM\n";
exit 0;
}
$ulps_file = $opt_u if ($opt_u);
$output_dir = $opt_o if ($opt_o);
-$default_ulp = $opt_d if ($opt_d);
$input = "libm-test.inc";
$output = "${output_dir}libm-test.c";
@@ -458,11 +455,7 @@ sub generate_testfile {
if (exists $results{$fct}{'has_ulps'}) {
$line .= "DELTA$fct";
} else {
- if ($type eq 'complex') {
- $line .= "BUILD_COMPLEX ($default_ulp, $default_ulp)";
- } else {
- $line .= "$default_ulp";
- }
+ $line .= '0';
}
if (exists $results{$fct}{'has_fails'}) {
$line .= ", FAIL$fct";
@@ -641,21 +634,22 @@ sub get_ulps {
if ($type eq 'complex') {
my ($res);
+ # Return 0 instead of BUILD_COMPLEX (0,0)
if (!exists $results{$test}{'real'}{'ulp'}{$float} &&
!exists $results{$test}{'imag'}{'ulp'}{$float}) {
- return "BUILD_COMPLEX ($default_ulp, $default_ulp)";
+ return "0";
}
$res = 'BUILD_COMPLEX (';
$res .= (exists $results{$test}{'real'}{'ulp'}{$float}
- ? $results{$test}{'real'}{'ulp'}{$float} : "$default_ulp");
+ ? $results{$test}{'real'}{'ulp'}{$float} : "0");
$res .= ', ';
$res .= (exists $results{$test}{'imag'}{'ulp'}{$float}
- ? $results{$test}{'imag'}{'ulp'}{$float} : "$default_ulp");
+ ? $results{$test}{'imag'}{'ulp'}{$float} : "0");
$res .= ')';
return $res;
}
return (exists $results{$test}{'normal'}{'ulp'}{$float}
- ? $results{$test}{'normal'}{'ulp'}{$float} : "$default_ulp");
+ ? $results{$test}{'normal'}{'ulp'}{$float} : "0");
}
sub get_failure {