X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/39c935d6d5ee86d153f6f7e6a10d723ae7c57f6f..d96de3f7d327fa93b2a17da67b1659587f24107b:/tools/simgrid_update_xml.pl diff --git a/tools/simgrid_update_xml.pl b/tools/simgrid_update_xml.pl index 0ccd36e3e7..e62d011134 100755 --- a/tools/simgrid_update_xml.pl +++ b/tools/simgrid_update_xml.pl @@ -2,10 +2,10 @@ eval 'exec perl -S $0 ${1+"$@"}' if $running_under_some_shell; -# This script updates the simgrid XML file passed as argument (modification in place) +# This script updates the SimGrid XML file passed as argument (modification in place) # It is built to do the conversion incrementally. -# Copyright (c) 2006-2021. The SimGrid Team. +# Copyright (c) 2006-2023. The SimGrid Team. # All rights reserved. # # This program is free software; you can redistribute it and/or modify it @@ -15,7 +15,7 @@ eval 'exec perl -S $0 ${1+"$@"}' =head1 NAME -simgrid_update_xml - updates simgrid XML files to latest version +simgrid_update_xml - updates SimGrid XML files to latest version =head1 SYNOPSIS @@ -23,7 +23,7 @@ B I =head1 DESCRIPTION -simgrid_update_xml updates the simgrid XML file passed as argument. The file +simgrid_update_xml updates the SimGrid XML file passed as argument. The file is modified in place, without any kind of backup. You may want to save a copy before running the script. @@ -156,11 +156,11 @@ In and , rename the 'availability_file' attribute into 'speed_file' =head1 AUTHORS - The SimGrid team (simgrid-devel@lists.gforge.inria.fr) + The SimGrid team =head1 COPYRIGHT AND LICENSE -Copyright (c) 2006-2021. The SimGrid Team. All rights reserved. +Copyright (c) 2006-2023. The SimGrid Team. All rights reserved. This program is free software; you may redistribute it and/or modify it under the terms of GNU LGPL (v2.1) license. @@ -247,11 +247,11 @@ while (defined($line = )) { $output_string .= " \n"; $AS_opened=1; } - + if($line=~/)) { } $line =~ s/\bFULLDUPLEX\b/SPLITDUPLEX/g; $line =~ s/\bavailability_file\b/speed_file/g; - + $output_string .= "$line\n"; }