moparisthebest/wget
1
0
Fork 0
mirror of https://github.com/moparisthebest/wget synced 2024-07-03 16:38:41 -04:00
Code Issues Releases Wiki Activity

Added GDB support to Perl tests

Browse Source 
* WgetTests.pm (run): Check GDB_TESTS environment variable.
This commit is contained in:
Tim Ruehsen 2015-04-11 17:14:56 +02:00
parent f4072e5d0b
commit 5c5d45ae49
1 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
tests/WgetTests.pm
View File

@ -120,10 +120,20 @@ sub run
($cmdline =~ m{^/.*}msx) ? $cmdline : "$self->{_workdir}/$cmdline";
my $valgrind = $ENV{VALGRIND_TESTS};
if (!defined $valgrind || $valgrind eq q{} || $valgrind == 0)
if (!defined $valgrind)
{
$valgrind = 0;
}
# Valgrind not requested - leave $cmdline as it is
my $gdb = $ENV{GDB_TESTS};
if (!defined $gdb)
{
$gdb = 0;
}
if ($gdb == 1)
{
$cmdline = 'gdb --args ' . $cmdline;
}
elsif ($valgrind == 1)
{
@ -132,7 +142,7 @@ sub run
. ' --error-exitcode=301 --leak-check=yes --track-origins=yes '
. $cmdline;
}
else
elsif ($valgrind ne q{} && $valgrind != 0)
{
$cmdline = "$valgrind $cmdline";
}