https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61209
Bug ID: 61209
Summary: [4.10 Regression] internal compiler error: in
fold_convert_loc, at fold-const.c:1950
Product: gcc
Version: 4.10.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: middle-end
Assignee: unassigned at gcc dot gnu.org
Reporter: Joost.VandeVondele at mat dot ethz.ch
known good: r210485 known bad: r210542 possibly r210491
> cat bug.f90
MODULE array_types
INTERFACE array_data
MODULE PROCEDURE array_data_i1d
END INTERFACE
TYPE array_i1d_type
END TYPE array_i1d_type
TYPE array_i1d_obj
TYPE(array_i1d_type), POINTER :: low
END TYPE array_i1d_obj
TYPE dbcsr_type
TYPE(array_i1d_obj) :: local_rows
LOGICAL :: local_indexing
END TYPE dbcsr_type
TYPE dbcsr_obj
TYPE(dbcsr_type) :: m
END TYPE dbcsr_obj
CONTAINS
FUNCTION array_data_i1d(array) RESULT (DATA)
TYPE(array_i1d_obj), INTENT(IN) :: array
INTEGER, DIMENSION(:), POINTER :: DATA
IF (ASSOCIATED (array%low)) THEN
ENDIF
END FUNCTION array_data_i1d
SUBROUTINE dbcsr_make_index_list (matrix, thread_redist)
TYPE(dbcsr_obj), INTENT(INOUT) :: matrix
LOGICAL, INTENT(IN) :: thread_redist
INTEGER, ALLOCATABLE, DIMENSION(:, :) :: blki
INTEGER, DIMENSION(:), POINTER :: local_rows, td
INTEGER :: blk
nthreads = 0
IF (nthreads .GT. 0 .AND. thread_redist) THEN
IF (matrix%m%local_indexing) THEN
local_rows => array_data (matrix%m%local_rows)
ENDIF
CALL dbcsr_build_row_index_inplace (thr_c, nthreads)
IF (matrix%m%local_indexing) THEN
DO blk = 1, nblks
IF (td(local_rows(blki(1, blk))) .EQ. ithread) THEN
ENDIF
ENDDO
ENDIF
ENDIF
END SUBROUTINE dbcsr_make_index_list
END MODULE
> gfortran -c -fbounds-check -O1 bug.f90
bug.f90: In function ‘dbcsr_make_index_list’:
bug.f90:23:0: internal compiler error: in fold_convert_loc, at
fold-const.c:1950
END FUNCTION array_data_i1d
^
0x8144c5 fold_convert_loc(unsigned int, tree_node*, tree_node*)
../../gcc/gcc/fold-const.c:1949
0x8323a4 fold_widened_comparison
../../gcc/gcc/fold-const.c:6745
0x8323a4 fold_comparison
../../gcc/gcc/fold-const.c:9419
0x7f25aa fold_binary_loc(unsigned int, tree_code, tree_node*, tree_node*,
tree_node*)
../../gcc/gcc/fold-const.c:13432
0xbdf360 cond_dom_walker::before_dom_children(basic_block_def*)
../../gcc/gcc/tree-ssa-sccvn.c:4229
0xf8d62a dom_walker::walk(basic_block_def*)
../../gcc/gcc/domwalk.c:177
0xbdea8e run_scc_vn(vn_lookup_kind)
../../gcc/gcc/tree-ssa-sccvn.c:4295
0xbb5591 execute
../../gcc/gcc/tree-ssa-pre.c:4846
Please submit a full bug report,
