Show
Ignore:
Timestamp:
07/02/09 09:58:01 (5 months ago)
Author:
buntinas
Message:

squashed more warnings

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • mpich2/trunk/src/mpi/datatype/type_create_struct.c

    r3177 r4888  
    7575        MPID_BEGIN_ERROR_CHECKS; 
    7676        { 
    77             int i; 
     77            int j; 
    7878            MPID_Datatype *datatype_ptr = NULL; 
    7979 
     
    8888            } 
    8989 
    90             for (i=0; i < count; i++) { 
    91                 MPIR_ERRTEST_ARGNEG(array_of_blocklengths[i], "blocklen", mpi_errno); 
    92                 MPIR_ERRTEST_DATATYPE(array_of_types[i], "datatype[i]", 
     90            for (j=0; j < count; j++) { 
     91                MPIR_ERRTEST_ARGNEG(array_of_blocklengths[j], "blocklen", mpi_errno); 
     92                MPIR_ERRTEST_DATATYPE(array_of_types[j], "datatype[j]", 
    9393                                      mpi_errno); 
    9494                if (mpi_errno != MPI_SUCCESS) goto fn_fail; 
    9595                         
    96                 if (array_of_types[i] != MPI_DATATYPE_NULL && HANDLE_GET_KIND(array_of_types[i]) != HANDLE_KIND_BUILTIN) { 
    97                     MPID_Datatype_get_ptr(array_of_types[i], datatype_ptr); 
     96                if (array_of_types[j] != MPI_DATATYPE_NULL && HANDLE_GET_KIND(array_of_types[j]) != HANDLE_KIND_BUILTIN) { 
     97                    MPID_Datatype_get_ptr(array_of_types[j], datatype_ptr); 
    9898                    MPID_Datatype_valid_ptr(datatype_ptr, mpi_errno); 
    9999                    if (mpi_errno != MPI_SUCCESS) goto fn_fail;