2007-07-09 Thomas Koenig <tkoenig@gcc.gnu.org>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / array_constructor_1.f90

diff --git a/gcc/testsuite/gfortran.dg/array_constructor_1.f90 b/gcc/testsuite/gfortran.dg/array_constructor_1.f90
index 20452f3..0ba8ba0 100644 (file)
--- a/gcc/testsuite/gfortran.dg/array_constructor_1.f90
+++ b/gcc/testsuite/gfortran.dg/array_constructor_1.f90
@@ -4,12 +4,12 @@ program bracket_array_constructor
     implicit none
     integer :: a(4), i
 
-    a = [ 1, 2, 3, 4 ]  ! { dg-warning "array constructor" }
+    a = [ 1, 2, 3, 4 ]
     do i = 1, size(a)
         if (a(i) /= i) call abort()
     end do
 
-    a = [ (/ 1, 2, 3, 4 /) ]  ! { dg-warning "array constructor" }
+    a = [ (/ 1, 2, 3, 4 /) ]
     do i = 1, size(a)
         if (a(i) /= i) call abort()
     end do