diff options
author | Andreas Jaeger <aj@suse.de> | 2001-08-28 08:05:41 +0000 |
---|---|---|
committer | Andreas Jaeger <aj@suse.de> | 2001-08-28 08:05:41 +0000 |
commit | 41713d4e8cf773b6138d1b3a2c093ec5a1fdc8aa (patch) | |
tree | 0464e4ab820d600c0772377a9faaabfe83540161 /manual/libm-err-tab.pl | |
parent | c06a49c551ebfc7f320a05546b5a013714ac82e5 (diff) | |
download | glibc-41713d4e8cf773b6138d1b3a2c093ec5a1fdc8aa.tar.gz glibc-41713d4e8cf773b6138d1b3a2c093ec5a1fdc8aa.tar.xz glibc-41713d4e8cf773b6138d1b3a2c093ec5a1fdc8aa.zip |
* manual/libc-texinfo.sh: Add entry about free manuals.
* manual/contrib.texi (Contributors): Fix cross reference. * manual/libc.texinfo (Copying): Include freemanuals. * manual/Makefile (appendices): Add freemanuals. * manual/freemanuals.texi: New file. Patch by Brian Youmans <3diff@gnu.org>. * manual/libm-err-tab.pl: Pretty print more platforms, print a smaller table. * manual/math.texi (Errors in Math Functions): Fix grammar, start table on separate page. Patch by Brian Youmans <3diff@gnu.org>.
Diffstat (limited to 'manual/libm-err-tab.pl')
-rwxr-xr-x | manual/libm-err-tab.pl | 53 |
1 files changed, 43 insertions, 10 deletions
diff --git a/manual/libm-err-tab.pl b/manual/libm-err-tab.pl index 3357d1855e..799c5b85ff 100755 --- a/manual/libm-err-tab.pl +++ b/manual/libm-err-tab.pl @@ -52,10 +52,19 @@ use vars qw (%results @all_floats %suffices @all_functions); %pplatforms = ( "i386/fpu" => "ix86", "generic" => "Generic", - "alpha" => "Alpha" + "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" ); -@all_functions = +@all_functions = ( "acos", "acosh", "asin", "asinh", "atan", "atanh", "atan2", "cabs", "cacos", "cacosh", "carg", "casin", "casinh", "catan", "catanh", "cbrt", "ccos", "ccosh", "ceil", "cexp", "cimag", @@ -79,6 +88,8 @@ if ($#ARGV == 0) { find (\&find_files, $sources); +@platforms = sort by_platforms @platforms; + &print_all; sub find_files { @@ -131,7 +142,7 @@ sub parse_ulps { } elsif ($eps eq "0") { # ignore next; - } elsif (!exists $results{$test}{$platform}{$type}{$float} + } elsif (!exists $results{$test}{$platform}{$type}{$float} || $results{$test}{$platform}{$type}{$float} ne 'fail') { $results{$test}{$platform}{$type}{$float} = $eps; } @@ -150,7 +161,7 @@ sub parse_ulps { sub get_value { my ($fct, $platform, $type, $float) = @_; - return (exists $results{$fct}{$platform}{$type}{$float} + return (exists $results{$fct}{$platform}{$type}{$float} ? $results{$fct}{$platform}{$type}{$float} : "0"); } @@ -163,27 +174,28 @@ sub canonicalize_platform { return exists $pplatforms{$platform} ? $pplatforms{$platform} : $platform; } -sub print_all { - my ($fct, $platform, $float, $first, $i); +sub print_platforms { + my (@p) = @_; + my ($fct, $platform, $float, $first, $i, $platform_no, $platform_total); print '@multitable {nexttowardf} '; - foreach (@platforms) { + foreach (@p) { print ' {1000 + i 1000}'; } print "\n"; print '@item Function '; - foreach (@platforms) { + foreach (@p) { print ' @tab '; print &canonicalize_platform ($_); } print "\n"; - + foreach $fct (@all_functions) { foreach $float (@all_floats) { print "\@item $fct$suffices{$float} "; - foreach $platform (@platforms) { + foreach $platform (@p) { print ' @tab '; if (exists $results{$fct}{$platform}{'normal'}{$float} || exists $results{$fct}{$platform}{'real'}{$float} @@ -204,3 +216,24 @@ sub print_all { print "\@end multitable\n"; } + +sub print_all { + my ($i, $max); + + my ($columns) = 5; + + # Print only 5 platforms at a time. + for ($i=0; $i < $#platforms; $i+=$columns) { + $max = $i+$columns-1 > $#platforms ? $#platforms : $i+$columns-1; + print_platforms (@platforms[$i .. $max]); + } +} + +sub by_platforms { + my ($pa, $pb); + + $pa = $pplatforms{$a} ? $pplatforms{$a} : $a; + $pb = $pplatforms{$b} ? $pplatforms{$b} : $b; + + return $pa cmp $pb; +} |