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

[Janus Weil]

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.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr42804.diff
Type: application/octet-stream
Size: 805 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100119/6c51a77c/attachment.obj>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: proc_ptr_comp_pass_6.f90
Type: application/octet-stream
Size: 747 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100119/6c51a77c/attachment-0001.obj>