diff options
Diffstat (limited to '3rdParty/LCov/gendesc')
-rwxr-xr-x | 3rdParty/LCov/gendesc | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/3rdParty/LCov/gendesc b/3rdParty/LCov/gendesc index 522ef69..7287c83 100755 --- a/3rdParty/LCov/gendesc +++ b/3rdParty/LCov/gendesc @@ -38,10 +38,12 @@ use strict; use File::Basename; use Getopt::Long; +use Cwd qw/abs_path/; # Constants -our $lcov_version = 'LCOV version 1.9'; +our $tool_dir = abs_path(dirname($0)); +our $lcov_version = "LCOV version 1.12"; our $lcov_url = "http://ltp.sourceforge.net/coverage/lcov.php"; our $tool_name = basename($0); @@ -67,9 +69,6 @@ our $input_filename; $SIG{__WARN__} = \&warn_handler; $SIG{__DIE__} = \&die_handler; -# Prettify version string -$lcov_version =~ s/\$\s*Revision\s*:?\s*(\S+)\s*\$/$1/; - # Parse command line options if (!GetOptions("output-filename=s" => \$output_filename, "version" =>\$version, @@ -153,13 +152,13 @@ sub gen_desc() local *OUTPUT_HANDLE; my $empty_line = "ignore"; - open(INPUT_HANDLE, $input_filename) + open(INPUT_HANDLE, "<", $input_filename) or die("ERROR: cannot open $input_filename!\n"); # Open output file for writing if ($output_filename) { - open(OUTPUT_HANDLE, ">$output_filename") + open(OUTPUT_HANDLE, ">", $output_filename) or die("ERROR: cannot create $output_filename!\n"); } else |