re PR fortran/79929 (Bogus Warning: '__builtin_memset': specified size 4294967291...

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

	PR fortran/79929
	* gfortran.dg/warn_concat.f90: New test.

From-SVN: r258630

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 85b41909c5e98f4f6505dce1bbcb535570c22db9..098444aaf33c4c2969f5cf1332a24eb73f208f5a 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2018-03-18  Thomas Koenig  <tkoenig@gcc.gnu.org>
+
+       PR fortran/79929
+       * gfortran.dg/warn_concat.f90: New test.
+
 2018-03-16  Jakub Jelinek  <jakub@redhat.com>
 
        PR target/84899

diff --git a/gcc/testsuite/gfortran.dg/warn_concat.f90 b/gcc/testsuite/gfortran.dg/warn_concat.f90
new file mode 100644 (file)
index 0000000..8006dd3
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/warn_concat.f90
@@ -0,0 +1,9 @@
+! { dg-do compile }
+! { dg-additional-options "-Wall -O3" }
+! PR 79929 - this used to give a warning.
+! Test case by Harald Anlauf.
+subroutine gfcbug138 (yerrmsg)
+  character(*) :: yerrmsg
+  yerrmsg = ""
+  yerrmsg = "bug: " // yerrmsg
+end subroutine gfcbug138