Wrong error triggered: an ambiguous reference to symbol

[clementval]

The following valid Fortran code trigger an error.

module real_size
  integer, parameter :: RR=4
end module real_size

real(RR) function fct1(t)
  use real_size
implicit none
  real(RR) t
end

"function.F90", line 4: an ambiguous reference to symbol 'rr'
"function.F90", line 4: Invalid type spec

[h-murai]

@clementval Do you have any idea about this issue? Otherwise, I'll investigate it because someone is waiting for the solution.

[clementval]

@h-murai Let me have a quick look again at this issue

[clementval]

@h-murai Ok, I remember this problem. RR is defined first in the function return type and therefore, when it is imported from the use statement, it becomes ambiguous.
I do not have a fix right now but I can work on one.

@g009266 What is your use case? A quick work around is to declare the return type inside the declaration part.

[g009266]

@clementval<https://github.com/clementval> Yes, a workaround for now is to declare it inside the function. The actual function looks as following: integer(c_long) function fxt_faltld_wsizemax(falt) bind(c) And we changed that to: function fxt_faltld_wsize(falt, m) bind(c) integer(kind=c_long) :: fxt_faltld_wsizemax But it would be nice to be able to deal with these kind of structures.

[clementval]

@g009266 Sure, will look for a fix.