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

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |tkoenig at gcc dot gnu.org
   Last reconfirmed|                            |2020-04-12
     Ever confirmed|0                           |1
           Keywords|                            |error-recovery,
                   |                            |ice-on-invalid-code
             Status|UNCONFIRMED                 |NEW

--- Comment #1 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Confirmed at least down to gfortran 7.

It does indeed issue a warning:

/usr/bin/gfortran interface_46.f90 
interface_46.f90:17:4:

     function cntf(a) result(s)
    1
Warning: Interface mismatch in global procedure ‘cntf’ at (1): Rank mismatch in
function result (0/1) [-Wargument-mismatch]
interface_46.f90:30:0:

   s = cntf(arr)

internal compiler error: in fold_convert_loc, at fold-const.c:2275

It might make more sense to issue an error in case of a function
result.

Reply via email to