[Bug fortran/56969] [4.9 Regression] ISO_C_BINDING regression with current trunk

2013-04-16 Thread burnus at gcc dot gnu.org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56969



Tobias Burnus  changed:



   What|Removed |Added



 Status|NEW |RESOLVED

 Resolution||FIXED



--- Comment #5 from Tobias Burnus  2013-04-16 
14:18:35 UTC ---

FIXED.



Thanks for the report!


[Bug fortran/56969] [4.9 Regression] ISO_C_BINDING regression with current trunk

2013-04-16 Thread burnus at gcc dot gnu.org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56969



--- Comment #4 from Tobias Burnus  2013-04-16 
14:18:12 UTC ---





Author: burnus

Date: Tue Apr 16 14:17:15 2013

New Revision: 198000



URL: http://gcc.gnu.org/viewcvs?rev=198000&root=gcc&view=rev

Log:

2013-04-16  Tobias Burnus  



PR fortran/56969

* intrinsic.c (gfc_intrinsic_func_interface): Don't set

module name to "(intrinsic)" for intrinsics from intrinsic

modules.



2013-04-16  Tobias Burnus  



PR fortran/56969

* gfortran.dg/c_assoc_5.f90: New.





Added:

trunk/gcc/testsuite/gfortran.dg/c_assoc_5.f90

Modified:

trunk/gcc/fortran/ChangeLog

trunk/gcc/fortran/intrinsic.c

trunk/gcc/testsuite/ChangeLog


[Bug fortran/56969] [4.9 Regression] ISO_C_BINDING regression with current trunk

2013-04-16 Thread burnus at gcc dot gnu.org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56969



--- Comment #3 from Tobias Burnus  2013-04-16 
11:13:34 UTC ---

Draft patch:



--- a/gcc/fortran/intrinsic.c

+++ b/gcc/fortran/intrinsic.c

@@ -4238,3 +4238,4 @@ got_specific:

   expr->value.function.isym = specific;

-  gfc_intrinsic_symbol (expr->symtree->n.sym);

+  if (!expr->symtree->n.sym->module)

+gfc_intrinsic_symbol (expr->symtree->n.sym);


[Bug fortran/56969] [4.9 Regression] ISO_C_BINDING regression with current trunk

2013-04-15 Thread burnus at gcc dot gnu.org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56969



Tobias Burnus  changed:



   What|Removed |Added



   Keywords||rejects-valid

 CC|bur...@net-b.de |burnus at gcc dot gnu.org

   Target Milestone|--- |4.9.0



--- Comment #2 from Tobias Burnus  2013-04-15 
14:53:36 UTC ---

Workaround:



module extd_mat_mod

! use iso_c_binding  ! << comment this line



Or alternatively:

  use test_mod, only: s_Cmat  ! <<< add "only:"



The problem seems to be that the indirectly imported function "c_associated"

does not seem to get recognized as being the same as the indirectly imported

one.


[Bug fortran/56969] [4.9 Regression] ISO_C_BINDING regression with current trunk

2013-04-15 Thread dominiq at lps dot ens.fr


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56969



Dominique d'Humieres  changed:



   What|Removed |Added



 Status|UNCONFIRMED |NEW

   Last reconfirmed||2013-04-15

 CC||bur...@net-b.de

Summary|ISO_C_BINDING regression|[4.9 Regression]

   |with current trunk  |ISO_C_BINDING regression

   ||with current trunk

 Ever Confirmed|0   |1



--- Comment #1 from Dominique d'Humieres  2013-04-15 
14:40:14 UTC ---

Revision 196819 (2013-03-20) is OK, while revision 197238 (2013-03-29) gives

the error. I suspect revision 197053 (CCed Tobias).