Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Make generate_memcheck_tests.pl keep indentation (but the two first space).
[simgrid.git] / buildtools / Cmake / Scripts / my_valgrind.pl
1 #!/usr/bin/perl -w
2 use strict;
3 my @argv = ("valgrind");
4 my $count = 0;
5
6 while (my $arg = shift) {
7     print "arg($count)$arg\n";
8     if($arg eq "--cd"){
9         $arg = shift;
10         print "cd $arg\n";
11         chdir ($arg);
12         $count++;
13     } else{
14         push @argv, $arg;
15     }
16     $count++;
17 }
18
19 #print "COMMAND : $bin $option $cd $path\n";
20 #print "cd $path\n";
21 #print "valgrind --trace-children=yes --leak-check=full --show-reachable=yes --track-origins=yes --read-var-info=no $bin $option\n";
22 print "@argv\n\n";
23 system @argv;