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 

Error: amd_fill_namelist_block is not available in FTN95/64

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



Joined: 31 Oct 2006
Posts: 1884

PostPosted: Fri Mar 30, 2018 12:58 pm    Post subject: Error: amd_fill_namelist_block is not available in FTN95/64 Reply with quote

Given the code below, which is a pared-down skeleton of something else that does useful calculations, FTN95 8.10 fails with the error shown in the thread title when the options /64 /opt are specified.
Code:
      SUBROUTINE ORDDRV
      IMPLICIT NONE
      INTEGER :: ITAPE, IU1EL
      INTEGER :: NFTTAIL = 96, IPFLG = 0, I1ONLY = 0

      NAMELIST /INPUTO/ IPFLG, IU1EL, I1ONLY, NFTTAIL
!
      IU1EL=2
      ITAPE=IU1EL
      CALL OPENU(ITAPE)
      RETURN
!
      END SUBROUTINE ORDDRV

The error goes away if /opt is not used or /64 is not used or slight changes are made to the code (such as initializing IU1EL in the declaration rather than with a separate statement).
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


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

PostPosted: Fri Mar 30, 2018 5:12 pm    Post subject: Reply with quote

Thank you for the feedback. I have made a note of this.
Back to top
View user's profile Send private message AIM Address
PaulLaidler
Site Admin


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

PostPosted: Sun Feb 17, 2019 2:01 pm    Post subject: Reply with quote

This fragment of code compiles with /64 /opt at v8.40. It appears to have been fixed in some other context.
Back to top
View user's profile Send private message AIM Address
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