OSDN Git Service

2010-12-11 Jerry DeLisle <jvdelisle@gcc.gnu.org>
authorjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 11 Dec 2010 23:26:07 +0000 (23:26 +0000)
committerjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 11 Dec 2010 23:26:07 +0000 (23:26 +0000)
PR fortran/46705
* gfortran.dg/continuation_12.f90: New test.

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

gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/continuation_12.f90 [new file with mode: 0644]

index 934212f..ee46df3 100644 (file)
@@ -1,3 +1,8 @@
+2010-12-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+       PR fortran/46705
+       * gfortran.dg/continuation_12.f90: New test.
+
 2010-12-11  Tobias Burnus  <burnus@net-b.de>
 
        PR fortran/46370
diff --git a/gcc/testsuite/gfortran.dg/continuation_12.f90 b/gcc/testsuite/gfortran.dg/continuation_12.f90
new file mode 100644 (file)
index 0000000..171d826
--- /dev/null
@@ -0,0 +1,8 @@
+! { dg-do run }
+! PR46705 Spurious "Missing '&' in continued character constant" warning occurs twice
+character(15) :: astring
+1 FORMAT (''&
+   ' abcdefg x')
+write(astring, 1)
+if (astring.ne."' abcdefg x") call abort
+END