From: Tobias Burnus <burnus@net-b.de>
Date: Tue, 18 Sep 2007 17:09:47 +0000 (+0200)
Subject: elemental_optional_args_1.f90: Fix test.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=6b9de967764c7d77ee1572a578f292d6afe40280;p=gcc.git

elemental_optional_args_1.f90: Fix test.

2007-09-18  Tobias Burnus  <burnus@net-b.de>

	* gfortran.dg/elemental_optional_args_1.f90: Fix test.

From-SVN: r128583
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index fe8802588e8..4cf9eb53d55 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2007-09-18  Tobias Burnus  <burnus@net-b.de>
+
+	* gfortran.dg/elemental_optional_args_1.f90: Fix test.
+
 2007-09-18  Paolo Carlini  <pcarlini@suse.de>
 
 	PR c++/33463
diff --git a/gcc/testsuite/gfortran.dg/elemental_optional_args_1.f90 b/gcc/testsuite/gfortran.dg/elemental_optional_args_1.f90
index aed6cadc350..ea17b5e3446 100644
--- a/gcc/testsuite/gfortran.dg/elemental_optional_args_1.f90
+++ b/gcc/testsuite/gfortran.dg/elemental_optional_args_1.f90
@@ -34,7 +34,6 @@ CONTAINS
     write(6,*) efoo(A1,A3,A2)
     write(6,*) efoo(A1,A4,A3)
 ! check an elemental subroutine
-    call foobar (A5,A2,A3) ! { dg-warning "array and OPTIONAL" } 
     call foobar (A5,A2,A4)
     call foobar (A5,A4,A4)
   END SUBROUTINE