2016-11-04 Joseph Myers <joseph@codesourcery.com>
+ [BZ #14139]
+ * manual/libm-err-tab.pl (%pplatforms): Initialize to empty.
+ (find_files): Obtain platform name from libm-test-ulps-name and
+ store in %pplatforms.
+ (canonicalize_platform): Remove.
+ (print_platforms): Use $pplatforms directly.
+ (by_platforms): Do not allow for platforms missing from
+ %pplatforms.
+ * sysdeps/aarch64/libm-test-ulps-name: New file.
+ * sysdeps/alpha/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/arm/libm-test-ulps-name: Likewise.
+ * sysdeps/generic/libm-test-ulps-name: Likewise.
+ * sysdeps/hppa/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/i386/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/i386/i686/fpu/multiarch/libm-test-ulps-name: Likewise.
+ * sysdeps/ia64/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/m68k/coldfire/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/m68k/m680x0/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/microblaze/libm-test-ulps-name: Likewise.
+ * sysdeps/mips/mips32/libm-test-ulps-name: Likewise.
+ * sysdeps/mips/mips64/libm-test-ulps-name: Likewise.
+ * sysdeps/nios2/libm-test-ulps-name: Likewise.
+ * sysdeps/powerpc/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/powerpc/nofpu/libm-test-ulps-name: Likewise.
+ * sysdeps/s390/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/sh/libm-test-ulps-name: Likewise.
+ * sysdeps/sparc/fpu/libm-test-ulps-name: Likewise.
+ * sysdeps/tile/libm-test-ulps-name: Likewise.
+ * sysdeps/x86_64/fpu/libm-test-ulps-name: Likewise.
+
* sysdeps/unix/sysv/linux/mips/sys/user.h: Include <stddef.h>.
* sysdeps/unix/sysv/linux/mips/Makefile [$(subdir) = elf]
);
# Pretty description of platform
-%pplatforms =
- ( "i386/fpu" => "ix86",
- "generic" => "Generic",
- "alpha/fpu" => "Alpha",
- "ia64/fpu" => "IA64",
- "m68k/fpu" => "M68k",
- "mips/fpu" => "MIPS",
- "powerpc/fpu" => "PowerPC",
- "sparc/sparc32/fpu" => "Sparc 32-bit",
- "sparc/sparc64/fpu" => "Sparc 64-bit",
- "sh/sh4/fpu" => "SH4",
- "s390/fpu" => "S/390",
- "arm" => "ARM"
- );
+%pplatforms = ();
@all_functions =
( "acos", "acosh", "asin", "asinh", "atan", "atanh",
if ($_ eq 'libm-test-ulps') {
# print "Parsing $File::Find::name\n";
push @platforms, $File::Find::dir;
+ my ($file, $name);
+ $file = "${File::Find::name}-name";
+ open NAME, $file or die ("Can't open $file: $!");
+ $name = <NAME>;
+ chomp $name;
+ close NAME;
+ $pplatforms{$File::Find::dir} = $name;
&parse_ulps ($File::Find::name, $File::Find::dir);
}
}
? $results{$fct}{$platform}{$type}{$float} : "0");
}
-sub canonicalize_platform {
- my ($platform) = @_;
-
- $platform =~ s|^(.*/sysdeps/)||;
-
-
- return exists $pplatforms{$platform} ? $pplatforms{$platform} : $platform;
-}
-
sub print_platforms {
my (@p) = @_;
my ($fct, $platform, $float, $first, $i, $platform_no, $platform_total);
print '@item Function ';
foreach (@p) {
print ' @tab ';
- print &canonicalize_platform ($_);
+ print $pplatforms{$_};
}
print "\n";
}
sub by_platforms {
- my ($pa, $pb);
-
- $pa = $pplatforms{$a} ? $pplatforms{$a} : $a;
- $pb = $pplatforms{$b} ? $pplatforms{$b} : $b;
-
- return $pa cmp $pb;
+ return $pplatforms{$a} cmp $pplatforms{$b};
}