[Bug libfortran/32736] Replace -fallow-leading-underscore by Bind(C)

[fxcoudert at gcc dot gnu dot org]

------- Comment #2 from fxcoudert at gcc dot gnu dot org  2007-07-28 18:17 
-------
Hum, first problem: we can't make a function like _gfortran_selected_real_kind
bind(c) because it has optional arguments:

function selected_real_kind (p, r) &
           bind(c,name="_gfortran_selected_real_kind")
  implicit none
  integer, optional, intent (in) :: p, r

Error: Variable 'p' at (1) cannot have the OPTIONAL attribute because procedure
'selected_real_kind' is BIND(C)

Is there a way around this issue?


-- 


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