https://gcc.gnu.org/bugzilla/show_bug.cgi?id=94397
Bug ID: 94397 Summary: [10 Regression] the compiler consider "type is( real(kind(1.)) )" as a syntax error. Product: gcc Version: 10.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: chinoune.mehdi at hotmail dot com Target Milestone: --- Failed to build https://github.com/Goddard-Fortran-Ecosystem/pFUnit (which I successfully built last Monday 23-03-2020) this morning with gcc-git. This is the reduced code: $ cat type_is.f90 module m implicit none contains subroutine sub(a) class(*) :: a select type(a) type is ( real( kind(1.) ) ) a = 1. end select end subroutine sub end module m $ gfortran-10 -c type_is.f90 type_is.f90:7:32: 7 | type is ( real( kind(1.) ) ) | 1 Error: Syntax error in TYPE IS specification at (1) type_is.f90:8:14: 8 | a = 1. | 1 Error: Expected TYPE IS, CLASS IS or END SELECT statement following SELECT TYPE at (1) $gfortran-10 --version GNU Fortran (GCC) 10.0.1 20200330 (experimental)