https://gcc.gnu.org/bugzilla/show_bug.cgi?id=41227

Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |fxcoudert at gcc dot gnu.org

--- Comment #10 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
(In reply to Richard Biener from comment #9)
> Can somebody produce a reduced testcase pair that
> just has a bind-C named common with a single int so I can experiment a bit?

$ cat s.f90 
module foo
  use iso_c_binding
  integer(c_int) :: i
  common /com/ i
  bind(c,name="toto") :: /com/
end module foo

$ cat s.c 
int main(void)
{
  extern int toto;
  toto = 42;
}

Reply via email to