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

G. Steinmetz <gs...@t-online.de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-invalid-code

--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---

Detected with "type" instead of "class" :


$ cat z0.f90
program p
   type t
   end type
contains
   integer function f(x)
      type(t), allocatable :: x(:)
      f = size(x(1))
   end
end


$ gfortran-12-20210718 -c z0.f90
z0.f90:7:15:

    7 |       f = size(x(1))
      |               1
Error: 'array' argument of 'size' intrinsic at (1) must be an array

Reply via email to