[Patch, fortran] [10..11/14] Support coarray subreferences: Fix dim_corank_check

[Mikael Morin]

dim_corank_check uses gfc_find_array_ref to get coarray's array ref.
It won't work for obvious reasons for the case coarray(1,1) which is a
non-arrray (but still a coarray).
As the whole point of this is to get the corank, patch 10 replaces the call
to gfc_find_array_ref with a call to gfc_get_corank.
Then, in gfc_find_array_ref the coarray-specific code can be removed.
This is patch 11.

OK?
-------------- next part --------------
2011-10-06  Mikael Morin  <mikael.morin@sfr.fr>

	PR fortran/50420
	* check.c (dim_corank_check): Use gfc_get_corank to get corank.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr50420-10.diff
Type: text/x-diff
Size: 653 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20111007/eca2c929/attachment.bin>
-------------- next part --------------
2011-10-06  Mikael Morin  <mikael.morin@sfr.fr>

	* array.c (gfc_find_array_ref): Remove coarray-specific handling.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr50420-11.diff
Type: text/x-diff
Size: 454 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20111007/eca2c929/attachment-0001.bin>