Changeset 4888 for mpich2/trunk/src/mpi/datatype/type_create_hindexed.c
- Timestamp:
- 07/02/09 09:58:01 (5 months ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
mpich2/trunk/src/mpi/datatype/type_create_hindexed.c
r3177 r4888 74 74 MPID_BEGIN_ERROR_CHECKS; 75 75 { 76 int i;76 int j; 77 77 MPID_Datatype *datatype_ptr = NULL; 78 78 … … 91 91 MPID_Datatype_valid_ptr(datatype_ptr, mpi_errno); 92 92 } 93 for ( i=0; i < count; i++) {94 MPIR_ERRTEST_ARGNEG(blocklengths[ i], "blocklen", mpi_errno);93 for (j=0; j < count; j++) { 94 MPIR_ERRTEST_ARGNEG(blocklengths[j], "blocklen", mpi_errno); 95 95 } 96 96 if (mpi_errno != MPI_SUCCESS) goto fn_fail;
