PR fortran/69368

	* tree-dfa.c (get_ref_base_and_extent): Remove unreachable code.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@233153 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 647ccb7afa1d595cb7747a9e03a16612026cb13a..edfdf559d4eaa5e953c698f974bed840e206c07f 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2016-02-04  Jakub Jelinek  <jakub@redhat.com>
+
+       PR fortran/69368
+       * tree-dfa.c (get_ref_base_and_extent): Remove unreachable code.
+
 2016-02-04  Uros Bizjak  <ubizjak@gmail.com>
 
        PR rtl-optimization/69577

diff --git a/gcc/tree-dfa.c b/gcc/tree-dfa.c
index db560cf73602ee8fdf0841d586654870a19181a8..0e9805663b2f2c5bd5ab6da65c86ee4ef56ea0db 100644 (file)
--- a/gcc/tree-dfa.c
+++ b/gcc/tree-dfa.c
@@ -588,15 +588,6 @@ get_ref_base_and_extent (tree exp, HOST_WIDE_INT *poffset,
       exp = TREE_OPERAND (exp, 0);
     }
 
-  /* We need to deal with variable arrays ending structures.  */
-  if (seen_variable_array_ref
-      && maxsize != -1
-      && (TYPE_SIZE (TREE_TYPE (exp)) == NULL_TREE
-         || TREE_CODE (TYPE_SIZE (TREE_TYPE (exp))) != INTEGER_CST
-         || (bit_offset + maxsize
-             == wi::to_offset (TYPE_SIZE (TREE_TYPE (exp))))))
-    maxsize = -1;
-
  done:
   if (!wi::fits_shwi_p (bitsize) || wi::neg_p (bitsize))
     {