#! /usr/bin/perl
+# Copyright (c) 2005-2012, 2014. The SimGrid Team.
+# All rights reserved.
+
+# This program is free software; you can redistribute it and/or modify it
+# under the terms of the license (GNU LGPL) which comes with this package.
+
use strict;
use strict;
$outfile = $infile;
$outfile =~ s/\.c$/_unit.c/;
+ $outfile =~ s/\.cpp$/_unit.cpp/;
$outfile =~ s|.*/([^/]*)$|$1| if $outfile =~ m|/|;
$outfile = "$outdir$outfile";
open OUT,">${outdir}simgrid_units_main.c" || die "$progname: Cannot open main file '${outdir}simgrid_units_main.c': $!\n";
print OUT $GENERATED;
print OUT "#include <stdio.h>\n\n";
- print OUT "#include \"msg/msg.h\" /* MSG_init, xbt_init is not enough when using synchronized dynars */\n";
print OUT "#include \"xbt.h\"\n\n";
print OUT "extern xbt_test_unit_t _xbt_current_unit;\n\n";
print OUT "/* SGU: BEGIN PROTOTYPES */\n";
/* SGU: BEGIN SUITES DECLARATION */
/* SGU: END SUITES DECLARATION */
- MSG_init(&argc,argv);
+ xbt_init(&argc,argv);
/* Search for the tests to do */
selection[0]='\\0';