[Bug tree-optimization/71351] New: [7 Regression] ICE: Segmentation fault

["Joost.VandeVondele at mat dot ethz.ch" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 71351
           Summary: [7 Regression] ICE: Segmentation fault
           Product: gcc
           Version: 7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: tree-optimization
          Assignee: unassigned at gcc dot gnu.org
          Reporter: Joost.VandeVondele at mat dot ethz.ch
  Target Milestone: ---

recent trunk regression:

> cat bug.f90
MODULE k290
  INTEGER, PARAMETER :: dp=8
  TYPE csym_type
      INTEGER   :: isy, nc
      REAL(KIND=dp), DIMENSION(3,48) :: v
  END TYPE csym_type
CONTAINS
  SUBROUTINE print_crys_symmetry(csym)
    TYPE(csym_type), POINTER  :: csym
    INTEGER  :: n,i, unit
    vs = 0.0_dp
    DO n = 1, csym%nc
       DO i = 1, 3
          vs = vs + ABS(csym%v(i,n))
       END DO
    END DO
    IF (csym%isy==0) THEN
       WRITE (unit,*) &
            ' (sum of translation vectors=', vs, ')'
    END IF
    IF (indpg>0) THEN
       CALL xstring(pgrp(-indpg),i,j)
    END IF
  END SUBROUTINE print_crys_symmetry
END MODULE k290

> gfortran  -c -O2 -floop-nest-optimize bug.f90
bug.f90:8:0:

   SUBROUTINE print_crys_symmetry(csym)

internal compiler error: Segmentation fault
0xba222f crash_signal
        ../../gcc/gcc/toplev.c:333
0xbf6247 ssa_default_def(function*, tree_node*)
        ../../gcc/gcc/tree-dfa.c:305
0xbf87a8 get_or_create_ssa_default_def(function*, tree_node*)
        ../../gcc/gcc/tree-dfa.c:357
0xc33ab3 get_reaching_def
        ../../gcc/gcc/tree-into-ssa.c:1172
0xc33ab3 get_reaching_def
        ../../gcc/gcc/tree-into-ssa.c:1159
0xc340e7 rewrite_update_phi_arguments
        ../../gcc/gcc/tree-into-ssa.c:2025
0xc340e7 rewrite_update_dom_walker::before_dom_children(basic_block_def*)
        ../../gcc/gcc/tree-into-ssa.c:2145
0xc340e7 rewrite_update_dom_walker::before_dom_children(basic_block_def*)
        ../../gcc/gcc/tree-into-ssa.c:2078
0x12d2330 dom_walker::walk(basic_block_def*)
        ../../gcc/gcc/domwalk.c:265
0xc2fc67 rewrite_blocks
        ../../gcc/gcc/tree-into-ssa.c:2202
0xc372f8 update_ssa(unsigned int)
        ../../gcc/gcc/tree-into-ssa.c:3364
0x12fd6ea graphite_regenerate_ast_isl(scop*)
        ../../gcc/gcc/graphite-isl-ast-to-gimple.c:3203
0x12f4cb3 graphite_transform_loops()
        ../../gcc/gcc/graphite.c:329
0x12f5180 graphite_transforms
        ../../gcc/gcc/graphite.c:356
0x12f5180 execute
        ../../gcc/gcc/graphite.c:433
Please submit a full bug report,
with preprocessed source if appropriate.
Please include the complete backtrace with any bug report.
See <http://gcc.gnu.org/bugs.html> for instructions.