------- Comment #2 from burnus at gcc dot gnu dot org 2008-05-20 16:51 -------
The other problem mentioned in the thread is the following bogus warning:
procedure(stub), bind(C,name='cacosf') :: my_ACOS ! Compiles
1
Warning: Variable 'my_acos' at (1) may not be a C interoperable kind but it is
bind(c)
I think it appeared after 2008-05-01-Rev134843 and should be related to one of
the procedure patches. Test case:
module trig_sp
use ISO_C_BINDING
integer, parameter :: rkind = C_FLOAT
integer, parameter :: ckind = C_FLOAT_COMPLEX
abstract interface
function stub(z) bind(C)
import rkind, ckind
complex(ckind), value :: z
complex(ckind) stub
end function stub
end interface
procedure(stub), bind(C,name='cacosf') :: my_ACOS ! Compiles
end module trig_sp
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36275
