forums.silverfrost.com Forum Index forums.silverfrost.com
Welcome to the Silverfrost forums
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Unexplicable warning message during linking

 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> Support
View previous topic :: View next topic  
Author Message
jlb



Joined: 21 Oct 2020
Posts: 45

PostPosted: Tue May 04, 2021 3:32 pm    Post subject: Unexplicable warning message during linking Reply with quote

The following minimal reproducer code causes the linker (32 bit) to output a warning message
Quote:
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.
Code:
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
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 7916
Location: Salford, UK

PostPosted: Tue May 04, 2021 4:56 pm    Post subject: Reply with quote

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.
Back to top
View user's profile Send private message AIM Address
jlb



Joined: 21 Oct 2020
Posts: 45

PostPosted: Tue May 04, 2021 6:17 pm    Post subject: Reply with quote

Paul

Thanks a lot for your reply, which helps me stop looking for a solution to a problem that is obviously not one.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> Support All times are GMT + 1 Hour
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group