Index: examples/test/pt2pt/sendcplx.f =================================================================== RCS file: /MPIhome/mpich/examples/test/pt2pt/sendcplx.f,v retrieving revision 1.1.1.1 diff -r1.1.1.1 sendcplx.f 6c6 < INTEGER myid,IERR,NPROCS --- > INTEGER myid,IERR,NPROCS, stat(MPI_STATUS_SIZE) Index: examples/test/env/timertest.c =================================================================== RCS file: /MPIhome/mpich/examples/test/env/timertest.c,v retrieving revision 1.2 diff -r1.2 timertest.c 15c15 < fprintf( stderr, "Two successive calls to MPI_Wtime gave: (%f) (%f)\n", --- > fprintf( stdout, "Two successive calls to MPI_Wtime gave: (%f) (%f)\n", 17c17 < fprintf( stderr, "Five approximations to one second:\n"); --- > fprintf( stdout, "Five approximations to one second:\n"); 23c23 < fprintf( stderr, "%f seconds\n", t2 - t1 ); --- > fprintf( stdout, "%f seconds\n", t2 - t1 ); 26c26 < fprintf( stderr, "MPI_Wtick gave: (%10.8f)\n", tick ); --- > fprintf( stdout, "MPI_Wtick gave: (%10.8f)\n", tick ); Index: examples/test/context/attrtest.f =================================================================== RCS file: /MPIhome/mpich/examples/test/context/attrtest.f,v retrieving revision 1.1.1.1 diff -r1.1.1.1 attrtest.f 6a7 > integer PM_GLOBAL_ERROR, PM_NUM_NODES 12c13 < integer Faz_World --- > integer Faz_World, FazTag 28a30,31 > C. Make sure that we can get an attribute that hasn't been set yet (flag > C. is false) 31a35,39 > if (FazFlag) then > print *, 'Did not get flag==false when attr_get of key that' > print *, 'had not had a value set with attr_put' > endif > 33a42,45 > > C. Check that the put worked > call MPI_attr_get (MPI_COMM_WORLD, FazTag, FazAttr, > & FazFlag, Error) .