X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/6d6b8f250907dafb716b34f93ff72c300e4fb061..47a89aa9b4dea9c91feb54eb632b693c5b41f6ff:/tools/simgrid_update_xml.pl diff --git a/tools/simgrid_update_xml.pl b/tools/simgrid_update_xml.pl index 226d8492cb..2ca57b959b 100755 --- a/tools/simgrid_update_xml.pl +++ b/tools/simgrid_update_xml.pl @@ -1,7 +1,7 @@ #! /usr/bin/perl # This script updates the simgrid XML file passed as argument (modification in place) -# It is built to do the conversion incrementally (even if for now, only 2 versions are defined) +# It is built to do the conversion incrementally. # Copyright (C) 2006-2010. The SimGrid team. All rights reserved. # @@ -72,14 +72,12 @@ while (defined($line = )) { } if ($fromversion < 3) { - if($line =~ /^(.*)<\/platform>(.*)$/) { - $output_string .= " <\/AS>\n<\/platform>"; - } else { - $output_string .= "$line\n"; - } $line =~ s/\blink:ctn\b/link_ctn/g; $line =~ s/\btrace:connect\b/trace_connect/g; + $line =~ s/^(.*)<\/platform>(.*)$/ <\/AS>\n<\/platform>/; } + + $output_string .= "$line\n"; } close INPUT;