------- Additional Comments From c dot lemmen at fz-juelich dot de 2004-11-11 11:44 ------- Surprisingly (to me), adding a second call to the function resolves the problem, i.e. in the examples below the following code works
subroutine baz logical l l = bar (3) l = bar (3) ! alternatively, call l=bar(3.0) end subroutine Commenting out either of the calls to bar results in the code rejection -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18108