~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to tests/test-run.pl

  • Committer: Brian Aker
  • Date: 2011-08-16 01:07:54 UTC
  • mfrom: (2363.1.8 drizzle-trunk)
  • mto: This revision was merged to the branch mainline in revision 2399.
  • Revision ID: brian@tangent.org-20110816010754-14sxcxr7r9jczh6a
Fixes for --help work.

Show diffs side-by-side

added added

removed removed

Lines of Context:
263
263
my $opt_valgrind_drizzled= 0;
264
264
my $opt_valgrind_drizzletest= 0;
265
265
my $opt_valgrind_drizzleslap= 0;
266
 
my @default_valgrind_args= ("--show-reachable=yes --malloc-fill=0xDEADBEEF --free-fill=0xDEADBEEF");
 
266
my @default_valgrind_args= qw|--tool=memcheck --error-exitcode=1 --leak-check=yes --show-reachable=yes --track-fds=yes --malloc-fill=A5 --free-fill=DE|;
267
267
my @valgrind_args;
268
268
my $opt_valgrind_path;
269
269
my $opt_callgrind;
553
553
             'valgrind-drizzletest'       => \$opt_valgrind_drizzletest,
554
554
             'valgrind-drizzleslap'       => \$opt_valgrind_drizzleslap,
555
555
             'valgrind-drizzled'          => \$opt_valgrind_drizzled,
556
 
             'valgrind-options=s'       => sub {
557
 
               my ($opt, $value)= @_;
558
 
               # Deprecated option unless it's what we know pushbuild uses
559
 
               if ($value eq "--gen-suppressions=all --show-reachable=yes") {
560
 
                 push(@valgrind_args, $_) for (split(' ', $value));
561
 
                 return;
562
 
               }
563
 
               die("--valgrind-options=s is deprecated. Use ",
564
 
                   "--valgrind-option=s, to be specified several",
565
 
                   " times if necessary");
566
 
             },
567
556
             'valgrind-option=s'        => \@valgrind_args,
568
557
             'valgrind-path=s'          => \$opt_valgrind_path,
569
558
             'callgrind'                => \$opt_callgrind,