Commit 1d843546 by Janne Blomqvist

gfortran.dg/nested_modules_2.f90: Tighten test.

2011-12-12  Janne Blomqvist  <jb@gcc.gnu.org>

	* gfortran.dg/nested_modules_2.f90: Tighten test.

From-SVN: r182258
parent 007db660
2011-12-12 Janne Blomqvist <jb@gcc.gnu.org>
* gfortran.dg/nested_modules_2.f90: Tighten test.
2011-12-12 Eric Botcazou <ebotcazou@adacore.com> 2011-12-12 Eric Botcazou <ebotcazou@adacore.com>
* gcc.c-torture/execute/20111212-1.c: New test. * gcc.c-torture/execute/20111212-1.c: New test.
......
...@@ -33,7 +33,7 @@ program testfoobar ...@@ -33,7 +33,7 @@ program testfoobar
call sub1 (l) call sub1 (l)
i = 1 i = 1
call sub2 (l) call sub2 (l)
if (all (l.ne.(/84,42,0/))) call abort () if (any (l.ne.(/84,42,0/))) call abort ()
end program testfoobar end program testfoobar
! { dg-final { cleanup-modules "foo bar foobar" } } ! { dg-final { cleanup-modules "foo bar foobar" } }
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment