https://gcc.gnu.org/bugzilla/show_bug.cgi?id=103716

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |anlauf at gcc dot gnu.org

--- Comment #2 from anlauf at gcc dot gnu.org ---
No ICE for

  print *, g((x%len))

Furthermore, adding an interface

  interface 
     function g(x)
       integer, intent(in) :: x
     end function g
  end interface

in the original testcase gives the error:

pr103716-z1.f90:11:13:

   11 |   print *, g(x%len)
      |             1
Error: Rank mismatch in argument 'x' at (1) (scalar and rank-1)

This is wrong: x%len is actually a scalar.

* * *

I am not happy that this is marked as a regression, as the %len inquiry did
not exist before the commit in the subject.  If somebody else agrees, we should
remove that.

Reply via email to