| Message ID | 20120415171720.629743BE18@mailhost.lps.ens.fr |
|---|---|
| State | New |
| Headers | show |
--- ../_clean/gcc/testsuite/gfortran.dg/public_private_module_3.f90 2012-04-15 11:18:00.000000000 +0200 +++ gcc/testsuite/gfortran.dg/public_private_module_3.f90 2012-04-15 19:09:10.000000000 +0200 @@ -58,3 +58,4 @@ contains subroutine foo() end subroutine foo end module m2 +! { dg-final { keep-modules "" } } --- ../_clean/gcc/testsuite/gfortran.dg/public_private_module_4.f90 2012-04-15 11:18:00.000000000 +0200 +++ gcc/testsuite/gfortran.dg/public_private_module_4.f90 2012-04-15 19:12:08.000000000 +0200 @@ -20,3 +20,5 @@ a = b + (c .myop. a) call x%func() end +! { dg-final { cleanup-modules "m" } } +! { dg-final { cleanup-modules "m2" } }
> The testcase failed with ... It is fixed by the following patch This may need some synchronization with implicitly cleanup-modules, part 2. Dominique