- for (i=0; i<NKEYS; i++) {
- MPI_Info_get_valuelen( info, keys[i], &vallen, &flag );
- if (!flag) {
- errs++;
- printf( "get_valuelen failed for valid key %s\n", keys[i] );
- }
- MPI_Info_get( info, keys[i], MPI_MAX_INFO_VAL, value, &flag );
- if (!flag) {
- errs++;
- printf( "No value for key %s\n", keys[i] );
- }
- if (strcmp( value, values[i] )) {
- errs++;
- printf( "Incorrect value for key %s\n", keys[i] );
- }
- if (strlen(value) != vallen) {
- errs++;
- printf( "value_len returned %d but actual len is %d\n",
- vallen, (int) strlen(value) );
- }
+ for (i = 0; i < NKEYS; i++) {
+ MPI_Info_get_valuelen(info, keys[i], &vallen, &flag);
+ if (!flag) {
+ errs++;
+ printf("get_valuelen failed for valid key %s\n", keys[i]);
+ }
+ MPI_Info_get(info, keys[i], MPI_MAX_INFO_VAL, value, &flag);
+ if (!flag) {
+ errs++;
+ printf("No value for key %s\n", keys[i]);
+ }
+ if (strcmp(value, values[i])) {
+ errs++;
+ printf("Incorrect value for key %s\n", keys[i]);
+ }
+ if (strlen(value) != vallen) {
+ errs++;
+ printf("value_len returned %d but actual len is %d\n", vallen, (int) strlen(value));
+ }