overloaded cant be distinguished by return values?


I am trying to distinguisch overloaded functions by their result value
but get an error message from ifort 9.1:

cat overload.f90 ; ifort overload.f90 -c
module a

interface test
module procedure testa, testb
end interface test

contains

function testa() result(a)
integer :: a
a = 1
end function testa

function testb() result(b)
character(len=8) :: b
b = 'result'
end function testb
end module a
fortcom: Warning: overload.f90, line 14: The type/rank/keyword signature for this specific procedure matches another specific procedure that shares the same generic-name. [TESTB]
function testb() result(b)
-----------^

Is this correct behaviour or an error of ifort. pgf90/pgf95 version
7.0 does compile this example.

Kind regards
Berthold Höllmann
--
__ Address:
G / \ L Germanischer Lloyd
phone: +49-40-36149-7374 -+----+- Vorsetzen 35 P.O.Box 111606
fax : +49-40-36149-7320 \__/ D-20459 Hamburg D-20416 Hamburg
.

Relevant Pages