- Current_Test = (char*)"Testing timer increases";
- for (flag=0; flag<1000000; flag++) {
- if (MPI_Wtime() > t0) break;
- }
- if (flag >= 1000000) {
- fprintf( stderr, "MPI_WTIME is not returning increasing values!\n" );
- Test_Failed(Current_Test);
- MPI_Abort( MPI_COMM_WORLD, 1 );
- }
+/* Current_Test = (char*)"Testing timer increases";*/
+/* for (flag=0; flag<1000000; flag++) {*/
+/* if (MPI_Wtime() > t0) break;*/
+/* }*/
+/* if (flag >= 1000000) {*/
+/* fprintf( stderr, "MPI_WTIME is not returning increasing values!\n" );*/
+/* Test_Failed(Current_Test);*/
+/* MPI_Abort( MPI_COMM_WORLD, 1 );*/
+/* }*/