https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78122
Bug ID: 78122 Summary: internal compiler error: in get, at cgraph.h:395 Product: gcc Version: 7.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: physiker at toast2 dot net Target Milestone: --- Compiling the file pi.f90 causes an internal compiler error in get, at cgraph.h:395. When the program-name pi (after the program statement) is replaced by p, the code compiles without triggering an ice (see below). pi.f90 program pi implicit none real, target :: a real, pointer :: p => a a = 1. write(*, *) 'a:', a write(*, *) 'p:', p end program pi LANG=C gfortran-7 -o pi pi.f90 -W -Wall -v Driving: gfortran-7 -o pi pi.f90 -W -Wall -v -mmacosx-version-min=10.9.4 -l gfortran -shared-libgcc Using built-in specs. COLLECT_GCC=gfortran-7 COLLECT_LTO_WRAPPER=/usr/local/libexec/gcc/x86_64-apple-darwin13.4.0/7.0.0/lto-wrapper Target: x86_64-apple-darwin13.4.0 Configured with: ../gcc/configure --enable-languages=c,c++,fortran,lto --with-gmp=/sw --with-libiconv-prefix=/sw --with-isl=/sw --with-mpc=/sw --with-system-zlib --program-suffix=-7 Thread model: posix gcc version 7.0.0 20161025 (experimental) (GCC) COLLECT_GCC_OPTIONS='-o' 'pi' '-Wextra' '-Wall' '-v' '-mmacosx-version-min=10.9.4' '-shared-libgcc' '-mtune=core2' /usr/local/libexec/gcc/x86_64-apple-darwin13.4.0/7.0.0/f951 pi.f90 -fPIC -quiet -dumpbase pi.f90 -mmacosx-version-min=10.9.4 -mtune=core2 -auxbase pi -Wextra -Wall -version -fintrinsic-modules-path /usr/local/lib/gcc/x86_64-apple-darwin13.4.0/7.0.0/finclude -o /var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccA3BI7y.s GNU Fortran (GCC) version 7.0.0 20161025 (experimental) (x86_64-apple-darwin13.4.0) compiled by GNU C version 7.0.0 20161025 (experimental), GMP version 6.1.0, MPFR version 3.1.4, MPC version 1.0.3, isl version 0.15 GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096 GNU Fortran2008 (GCC) version 7.0.0 20161025 (experimental) (x86_64-apple-darwin13.4.0) compiled by GNU C version 7.0.0 20161025 (experimental), GMP version 6.1.0, MPFR version 3.1.4, MPC version 1.0.3, isl version 0.15 GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096 f951: internal compiler error: in get, at cgraph.h:395 f951: internal compiler error: Abort trap: 6 gfortran-7: internal compiler error: Abort trap: 6 (program f951) Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions. s/pi/p LANG=C gfortran-7 -o pi pi.f90 -W -Wall pi.f90:5:22: real, pointer :: p => a 1 Error: Symbol 'p' at (1) cannot have a type pi.f90:10:24: write(*, *) 'p:', p 1 Error: Symbol at (1) is not appropriate for an expression