replica nfl jerseysreplica nfl jerseyssoccer jerseyreplica nfl jerseys forums.silverfrost.com :: View topic - Problem with flywheel
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 

Problem with flywheel

 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> ClearWin+
View previous topic :: View next topic  
Author Message
simon



Joined: 05 Jul 2006
Posts: 295

PostPosted: Thu Apr 03, 2025 11:15 pm    Post subject: Problem with flywheel Reply with quote

The following program returns nonsense values if the up or down flywheel is pushed. The prompted value (adate%iyr) always becomes 0 regardless of how many times the button is pushed, and the other value (adate%imn) becomes corrupted. A similar problem occurs even if the value is a simple integer, but that always returns as 0. There is no problem if you type in the desired number.

The problem occurs with version 9.10, but not in 9.00.

Quote:

Program p
Use clrwin, Only: winio@
Type :: t
Integer :: iyr
Integer :: imn
End Type t
Type(t) :: adate
Integer :: iw, idy

adate%iyr = 2015
adate%imn = 4
idy = 15
Print *, adate
iw = winio@( '%dd%5rd', 1, adate%iyr )
Print *, adate
Print *, idy
iw = winio@( '%ff%dd%5rd', 1, idy )
Print *, idy
End Program p
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


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

PostPosted: Sat Apr 05, 2025 1:54 pm    Post subject: Reply with quote

Simon

Thank you for the feedback. This failure has been diagnosed as a regression dated from December 2024 that affects %dd when used with %rd.

Users who have FTN95 v9.10 will need to go back the an earlier version or send me a personal message (pm) to ask for a new DLLs.
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 -> ClearWin+ 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