diff options
| author | Richard Biener <rguenther@suse.de> | 2017-04-24 11:57:53 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2017-04-24 11:57:53 +0000 |
| commit | f30a1190ffff2c7fd5df923dbae1c16549cb8575 (patch) | |
| tree | e1cde05c251163ddd6694c368d86b0bd3421e9b2 /gcc/tree-scalar-evolution.c | |
| parent | 6e2e575a032dfc4f6a3c88dfc71282bf38cd8890 (diff) | |
re PR fortran/80494 (ICE in wide_int_to_tree)
2017-04-24 Richard Biener <rguenther@suse.de>
PR tree-optimization/80494
* tree-scalar-evolution.c (analyze_scalar_evolution_1): Bail
out for complex types.
* gfortran.dg/pr80494.f90: New testcase.
From-SVN: r247095
Diffstat (limited to 'gcc/tree-scalar-evolution.c')
| -rw-r--r-- | gcc/tree-scalar-evolution.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/tree-scalar-evolution.c b/gcc/tree-scalar-evolution.c index cbd17e8644f..7327d4eed6b 100644 --- a/gcc/tree-scalar-evolution.c +++ b/gcc/tree-scalar-evolution.c @@ -2049,7 +2049,9 @@ analyze_scalar_evolution_1 (struct loop *loop, tree var, tree res) basic_block bb; struct loop *def_loop; - if (loop == NULL || TREE_CODE (type) == VECTOR_TYPE) + if (loop == NULL + || TREE_CODE (type) == VECTOR_TYPE + || TREE_CODE (type) == COMPLEX_TYPE) return chrec_dont_know; if (TREE_CODE (var) != SSA_NAME) |