[Bug fortran/58331] [OOP] Bogus rank checking with explicit-/assumed-size arrays and CLASS

[dominiq at lps dot ens.fr]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58331

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2014-03-22
     Ever confirmed|0                           |1

--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
With the patch in comment 2, I also get (r208765)

pr58331.f90: In function 'upv':
pr58331.f90:19:0: error: non-trivial conversion at assignment
 program upv 
 ^
struct array1_unknown
struct array2_integer(kind=4)
class.6._data = parm.7;
pr58331.f90:19:0: internal compiler error: verify_gimple failed

I also get the same ICE if I use

     class(*), intent(in) :: a(..)
...
      print *, rank(a)