Unexplicable warning message during linking

The following minimal reproducer code causes the linker (32 bit) to output a warning message

WARNING - Module component RECUR has been defined differently here than previously in object file C:\[...]\TREC.obj (C:\[...]\TREC.obj)

I cannot explain. Removing RECURSIVE or DIMENSION of variable b allow linking without this warning. This warning does not appear while using 64 bit compiler/linker.

MODULE abc
INTERFACE
  RECURSIVE FUNCTION recur(a) RESULT(b)
  IMPLICIT NONE
  INTEGER :: a
  INTEGER, DIMENSION(2) :: b
  END FUNCTION recur
END INTERFACE
END MODULE abc

PROGRAM Test
USE abc
IMPLICIT NONE
END PROGRAM Test

FTN95 Version: 8.72

jib

This appears to be a false warning and a regression, presumably in FTN95 because SLINK has not changed substantially for many years.

It is not a recent regression so it could be very difficult to track down.

I suggest that you simply ignore the warning.

Paul

Thanks a lot for your reply, which helps me stop looking for a solution to a problem that is obviously not one.