2008-03-04 Uros Bizjak <ubizjak@gmail.com>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / comma_format_extension_4.f

diff --git a/gcc/testsuite/gfortran.dg/comma_format_extension_4.f b/gcc/testsuite/gfortran.dg/comma_format_extension_4.f
index 138c163..3053d3f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/comma_format_extension_4.f
+++ b/gcc/testsuite/gfortran.dg/comma_format_extension_4.f
@@ -2,7 +2,7 @@
 ! Note the missing , before i1 in the format.
 ! { dg-do run }
 ! { dg-options "" }
-      character*5 c
+      character*6 c
       write (c,1001) 1
       if (c .ne. '    1 ') call abort