X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/2591e519da64d744ad34e5ca2de5352eb4206b7b..3d845df082d79ab89649c1a8829eea201ae01085:/teshsuite/bug-17132/bug-17132.c diff --git a/teshsuite/bug-17132/bug-17132.c b/teshsuite/bug-17132/bug-17132.c index cecb3e4607..9cd6985a3a 100644 --- a/teshsuite/bug-17132/bug-17132.c +++ b/teshsuite/bug-17132/bug-17132.c @@ -1,3 +1,9 @@ +/* Copyright (c) 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. */ + #include "xbt/log.h" #include #include @@ -12,6 +18,9 @@ int main(int argc, char ** argv) MPI_Init(&argc, &argv); + int rank; + MPI_Comm_rank(MPI_COMM_WORLD,&rank); + double *a = malloc(sizeof(double) * M); double *b = malloc(sizeof(double) * N); @@ -33,6 +42,10 @@ int main(int argc, char ** argv) // Commenting out this barrier fixes it!! MPI_Barrier(MPI_COMM_WORLD); + if(rank==0) { + printf("Walltime = %g\n",MPI_Wtime()); + } + MPI_Finalize(); free(a); free(b);