diff options
Diffstat (limited to 'math/gen-libm-test.pl')
| -rwxr-xr-x | math/gen-libm-test.pl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/math/gen-libm-test.pl b/math/gen-libm-test.pl index 29522a3a25..a1c528d970 100755 --- a/math/gen-libm-test.pl +++ b/math/gen-libm-test.pl @@ -1,5 +1,5 @@ #!/usr/bin/perl -w -# Copyright (C) 1999-2013 Free Software Foundation, Inc. +# Copyright (C) 1999-2014 Free Software Foundation, Inc. # This file is part of the GNU C Library. # Contributed by Andreas Jaeger <aj@suse.de>, 1999. @@ -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); |