Changeset 4879
- Timestamp:
- 06/30/09 19:09:34 (4 months ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
mpich2/trunk/src/mpe2/src/wrappers/src/mpe_proff.c
r4813 r4879 484 484 void mper_fconsts_init( void ) 485 485 { 486 int world_rank;487 486 int use_mpih; 488 487 /* … … 512 511 } 513 512 #endif 513 /* 514 { 515 int world_rank; 514 516 PMPI_Comm_rank( MPI_COMM_WORLD, &world_rank ); 515 517 if ( world_rank == 0 ) { … … 520 522 printf( ".TRUE. = %d, .FALSE. = %d\n", MPER_F_TRUE, MPER_F_FALSE ); 521 523 } 524 } 525 */ 522 526 } 523 527
