A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Starting to implement a Chord example with MSG
[simgrid.git]
/
buildtools
/
Cmake
/
update_tesh.pl
diff --git
a/buildtools/Cmake/update_tesh.pl
b/buildtools/Cmake/update_tesh.pl
index
9d75190
..
862ffa6
100644
(file)
--- a/
buildtools/Cmake/update_tesh.pl
+++ b/
buildtools/Cmake/update_tesh.pl
@@
-1,13
+1,12
@@
#!/usr/bin/perl -w
use strict;
#!/usr/bin/perl -w
use strict;
-if($#ARGV!=
2
) {
- die "Usage: perl make_tesh.pl <directory> <old.tesh>
<new.tesh>
\n";
+if($#ARGV!=
1
) {
+ die "Usage: perl make_tesh.pl <directory> <old.tesh>\n";
}
my($directory)=$ARGV[0];
my($old)=$ARGV[1];
}
my($directory)=$ARGV[0];
my($old)=$ARGV[1];
-my($new)=$ARGV[2];
chdir("$directory");
chdir("$directory");
@@
-37,7
+36,7
@@
while(defined($line=<SH_LIGNE>))
$line =~ s/^\$\ */.\//g;
$line =~ s/^.\/lua/lua/g;
$line =~ s/^.\/ruby/ruby/g;
$line =~ s/^\$\ */.\//g;
$line =~ s/^.\/lua/lua/g;
$line =~ s/^.\/ruby/ruby/g;
- print "
$line_exec\n
";
+ print "
\n$line_exec
";
chomp $line;
open (FILE, "$line 2>&1|");
while(defined($l=<FILE>))
chomp $line;
open (FILE, "$line 2>&1|");
while(defined($l=<FILE>))