3 # Copyright (c) 2012-2018. The SimGrid Team. All rights reserved.
5 # This program is free software; you can redistribute it and/or modify it
6 # under the terms of the license (GNU LGPL) which comes with this package.
11 my @argv = ("valgrind");
14 while (defined(my $arg = shift)) {
15 # print "arg($count)$arg\n";
16 if ($arg =~ m!/smpirun$!) {
17 @argv = ( $arg, "-wrapper", "@argv" );
18 } elsif ($arg eq "--cd") {
30 # map { print "$_ " } @argv;