From: jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Thu, 4 Feb 2016 22:15:33 +0000 (+0000)
Subject: 	PR fortran/69368
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=931b245017ca1b7260d2309fd6421428571870e0;p=thirdparty%2Fgcc.git

	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 647ccb7afa1d..edfdf559d4ea 100644
--- 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 db560cf73602..0e9805663b2f 100644
--- 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))
     {