re PR fortran/85130 (Substrings out of range are not rejected)

2018-03-30  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/85130
	* gfortran.dg/substr_6.f90: Remove illegal test for
	out-of-bounds substring.

From-SVN: r258976

gcc/testsuite/ChangeLog

+2018-03-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
+
+	PR fortran/85130
+	* gfortran.dg/substr_6.f90: Remove illegal test for
+	out-of-bounds substring.
+
 2017-03-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
 	PR fortran/85111

gcc/testsuite/gfortran.dg/substr_6.f90

@@ -6,8 +6,6 @@ CHARACTER(5), parameter :: c0(1) = (/ "123" // ACHAR(0) // "5" /)
 CHARACTER*5 c(1)
 CHARACTER(1), parameter :: c1(5) = (/ "1", "2", "3", ACHAR(0), "5" /)
 
-c = c0(1)(-5:-8)
-if (c(1) /= "     ") STOP 1
 c = (/ c0(1)(1:5) /)
 do i=1,5
    if (c(1)(i:i) /= c1(i)) STOP 2