[Bug fortran/88871] [9.0 regression] ICE segmentation fault in f951

2019-01-16 Thread juergen.reuter at desy dot de 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88871

--- Comment #2 from Jürgen Reuter  ---
Here is a more minimal example:
  SUBROUTINE MNREAD(IFLGIN,IFLGUT)
  IMPLICIT DOUBLE PRECISION (A-H,O-Z)
  PARAMETER (MNE=100 , MNI=50)
  PARAMETER (MNIHL=MNI*(MNI+1)/2)
  CHARACTER*10 CPNAM  
  COMMON
 1/MN7NAM/ CPNAM(MNE)
 2/MN7EXT/ U(MNE)

  CHARACTER  CRDBUF*80, CUPBUF*10
  CUPBUF(1:10) = CRDBUF(1:10)
  RETURN
  END

or also to completely implicit typing
 SUBROUTINE MNREAD(IFLGIN,IFLGUT)
  PARAMETER (MNE=100 , MNI=50)
  PARAMETER (MNIHL=MNI*(MNI+1)/2)
  CHARACTER*10 CPNAM  
  COMMON
 1/MN7NAM/ CPNAM(MNE)
 2/MN7EXT/ U(MNE)
  CHARACTER  CRDBUF*80, CUPBUF*10
  CUPBUF(1:10) = CRDBUF(1:10)
  RETURN
  END

[Bug fortran/88871] [9.0 regression] ICE segmentation fault in f951

2019-01-15 Thread juergen.reuter at desy dot de 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88871

--- Comment #1 from Jürgen Reuter  ---
My suspicion goes toward the fix for PR81849, so maybe also the gcc-7 and gcc-8
branches are affected.