PR 42804: ICE with -fcheck=bounds and type bound procedure call on array element

[Janus Weil <janus at gcc dot gnu dot org>]

Hi all,

this patch is verging on obvious and fixes a problem with TBPs/PPCs
and -fcheck=bounds. Basically there was just a locus missing (plus
another small problem with PPCs). The PR has all the details. (I'm
including only the PPC version of the test case, since both are very
similar and rather special.)

The patch was regtested on x86_64-unknown-linux-gnu. Ok for trunk?

Cheers,
Janus


gcc/fortran/
2010-01-19  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/42804
	* resolve.c (extract_compcall_passed_object): Set locus for
	passed-object argument.
	(extract_ppc_passed_object): Set locus and correctly remove PPC
	reference.

gcc/testsuite/
2010-01-19  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/42804
	* gfortran.dg/proc_ptr_comp_pass_6.f90: New test.

Attachment: pr42804.diff
Description: Binary data

Attachment: proc_ptr_comp_pass_6.f90
Description: Binary data