[Patch, Fortran] PR34759 - Fix assumed-size check for intrinsic procedures

[Tobias Burnus]

If  "A(4,4,*)" then  A and A(4,4,:)  are invalid for, e.g., SHAPE.
However, A(:,:,4) is a rank-2 array with known bounds.

Solution: We need to add a check whether we have the whole array;
"A(:,:,:)" is already rejected elsewhere.

Build and regtested on x86-64-linux.
OK for the trunk?

Tobias
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: shape.diff
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20080113/1a36e4f2/attachment.ksh>