https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77680
Thomas Koenig <tkoenig at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
CC| |tkoenig at gcc dot gnu.org
Resolution|--- |FIXED
--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
This is now correctly rejected:
ig25@flaemmli:/tmp> cat d.f90
program p
bind(c) :: x
call s(x)
end
ig25@flaemmli:/tmp> gfortran d.f90
d.f90:2:15:
bind(c) :: x
1
Error: Variable ‘x’ at (1) cannot be BIND(C) because it is neither a COMMON
block nor declared at the module level scope
Closing.
