|
129 | 129 | * ompi_set_attr_int(..., foo, ...) |
130 | 130 | * |
131 | 131 | * 4. C reads the attribute value. The value returned is a pointer |
132 | | - * that points to an int that has a value |
133 | | - * of 7. |
| 132 | + * that points to an int that has a value of 7. |
134 | 133 | * |
135 | 134 | * Example: int *ret; |
136 | 135 | * MPI_Attr_get(..., &ret); |
137 | 136 | * -> *ret will equal 7. |
138 | 137 | * |
139 | | - * 5. Fortran MPI-1 reads the attribute value. This is the unity |
140 | | - * case; the same value is returned. |
| 138 | + * 5. Fortran MPI-1 reads the attribute value. The C int value is |
| 139 | + * cast to a fortran INTEGER (i.e., MPI_Fint) -- potentially being |
| 140 | + * truncated if sizeof(int) > sizeof(INTEGER). |
141 | 141 | * |
142 | 142 | * Example: INTEGER ret |
143 | 143 | * CALL MPI_ATTR_GET(..., ret, ierr) |
|
163 | 163 | * that points to an INTEGER (i.e., an MPI_Fint) that has a value |
164 | 164 | * of 7. |
165 | 165 | * --> NOTE: The external MPI interface does not distinguish between |
166 | | - * this case and case 7. It is the programer's responsibility |
| 166 | + * this case and case 10. It is the programer's responsibility |
167 | 167 | * to code accordingly. |
168 | 168 | * |
169 | 169 | * Example: MPI_Fint *ret; |
|
202 | 202 | * that points to an INTEGER(KIND=MPI_ADDRESS_KIND) (i.e., a void*) |
203 | 203 | * that has a value of 12. |
204 | 204 | * --> NOTE: The external MPI interface does not distinguish between |
205 | | - * this case and case 4. It is the programer's responsibility |
| 205 | + * this case and case 7. It is the programer's responsibility |
206 | 206 | * to code accordingly. |
207 | 207 | * |
208 | 208 | * Example A: MPI_Aint *ret; |
|
0 commit comments