[F-E, patch]: bug fixes for type components, etc.
Christopher D. Rickett
crickett@lanl.gov
Fri Jun 8 16:22:00 GMT 2007
>> Index: gcc/fortran/symbol.c
>> ===================================================================
>> --- gcc/fortran/symbol.c (revision 125544)
>> +++ gcc/fortran/symbol.c (working copy)
> [...]
>> @@ -3181,8 +3187,8 @@ gen_special_c_interop_ptr (int ptr_id, c
>> generate_isocbinding_symbol (module_name, ptr_id ==
>> ISOCBINDING_NULL_PTR ? ISOCBINDING_PTR
>> : ISOCBINDING_FUNPTR,
>> (char *) (ptr_id ==
>> ISOCBINDING_NULL_PTR - ?
>> "_gfortran_iso_c_binding_c_ptr"
>> - : "_gfortran_iso_c_binding_c_funptr"));
>> + ? "_gfortran_iso_c_binding_c_ptr" :
>> + "_gfortran_iso_c_binding_c_funptr"));
>> tmp_sym->ts.derived =
>> get_iso_c_binding_dt (ptr_id == ISOCBINDING_NULL_PTR
>> @@ -3723,8 +3729,8 @@ generate_isocbinding_symbol (const char
>> (mod_name, s == ISOCBINDING_FUNLOC
>> ? ISOCBINDING_FUNPTR : ISOCBINDING_FUNPTR,
>> (char *)(s == ISOCBINDING_FUNLOC -
>> ? "_gfortran_iso_c_binding_c_funptr"
>> - : "_gfortran_iso_c_binding_c_ptr"));
>> + ? "_gfortran_iso_c_binding_c_funptr" :
>> + "_gfortran_iso_c_binding_c_ptr"));
>> tmp_sym->ts.derived =
>> get_iso_c_binding_dt (s == ISOCBINDING_FUNLOC
>> ? ISOCBINDING_FUNPTR
>
> These two changes appear to just be introducing formatting errors, and they
> weren't mentioned in the ChangeLog. I presume they were included
> accidentally?
>
yes, they were accidental; my apologies.
Chris
More information about the Fortran
mailing list