This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [Patch, Fortran] PR52916 - fix TREE_PUBLIC() = 0 for module procedures


> The testcase failed with ...

It is fixed by the following patch

--- ../_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" } }

This may need some synchronization with 
implicitly cleanup-modules, part 2.

Dominique


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]