hi all,
the attached patch fixes PR 33020. currently, the kind of the SHAPE
parameter to c_f_pointer is set once the actual is seen. however, this can
prevent shape arguments of different kinds being used for different calls
within the same namespace. the SHAPE parameter should not be set because it
needs to allow any valid integer kind.
bootstrapped and regtested on x86 linux with no new failures.
Chris
:ADDPATCH fortran:
ChangeLog entry:
2007-08-09 Christopher D. Rickett <crickett@lanl.gov>
PR fortran/33020
* resolve.c (gfc_iso_c_sub_interface): Remove setting of type and
kind for optional SHAPE parameter of C_F_POINTER.
2007-08-09 Christopher D. Rickett <crickett@lanl.gov>
PR fortran/33020
* gfortran.dg/c_f_pointer_shape_tests_2.f03: Update test to
include multiple kinds for SHAPE parameter within a single
namespace.
* gfortran.dg/c_f_pointer_shape_tests_2_driver.c: Ditto.