]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Fix oversight from previous commit to pr70673.
authorThomas Koenig <tkoenig@gcc.gnu.org>
Wed, 27 Apr 2022 20:40:49 +0000 (22:40 +0200)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Wed, 27 Apr 2022 20:42:04 +0000 (22:42 +0200)
gcc/testsuite/ChangeLog:

* gfortran.dg/pr70673.f90: Removed second invalid
line.

gcc/testsuite/gfortran.dg/pr70673.f90

index 1449130274b64c94d31b1261153c337417213a58..6eb9e7fa1b73b8e795381bfbe4c86d5f07a5553a 100644 (file)
@@ -9,7 +9,6 @@ contains
   subroutine s(inp)
     character(*), intent(in) :: inp
     character(:), allocatable :: a
-    a = a           ! This used to ICE.
     a = inp
     a = a           ! This used to ICE too
     if ((len (a) .ne. 5) .or. (a .ne. "hello")) STOP 1