Let gen-libm-test.pl find itself when run outside source directory

This commit is contained in:
Andreas Schwab 2014-01-27 18:19:48 +01:00
parent 7329c17bcb
commit 1c0d11bce5
2 changed files with 8 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2014-01-27 Andreas Schwab <schwab@linux-m68k.org>
* math/gen-libm-test.pl ($srcdir): New variable.
($auto_input): Use it.
2014-01-27 Siddhesh Poyarekar <siddhesh@redhat.com>
[BZ #16506]

View File

@ -42,7 +42,7 @@ use strict;
use vars qw ($input $output $auto_input);
use vars qw (%results);
use vars qw (%beautify @all_floats);
use vars qw ($output_dir $ulps_file);
use vars qw ($output_dir $ulps_file $srcdir);
use vars qw (%auto_tests);
# all_floats is sorted and contains all recognised float types
@ -75,6 +75,7 @@ getopts('u:o:nh');
$ulps_file = 'libm-test-ulps';
$output_dir = '';
($srcdir = $0) =~ s{[^/]*$}{};
if ($opt_h) {
print "Usage: gen-libm-test.pl [OPTIONS]\n";
@ -89,7 +90,7 @@ $ulps_file = $opt_u if ($opt_u);
$output_dir = $opt_o if ($opt_o);
$input = "libm-test.inc";
$auto_input = "auto-libm-test-out";
$auto_input = "${srcdir}auto-libm-test-out";
$output = "${output_dir}libm-test.c";
&parse_ulps ($ulps_file);