replica nfl jerseysreplica nfl jerseyssoccer jerseyreplica nfl jerseys forums.silverfrost.com :: View topic - FTN 95 8.10 Personal Edition
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 

FTN 95 8.10 Personal Edition
Goto page 1, 2, 3  Next
 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> General
View previous topic :: View next topic  
Author Message
dpannhorst



Joined: 29 Aug 2005
Posts: 165
Location: Berlin, Germany

PostPosted: Fri Feb 24, 2017 12:03 pm    Post subject: FTN 95 8.10 Personal Edition Reply with quote

Will the new version 8.10 of FTN95 also be available as Personal Edition?
Back to top
View user's profile Send private message Visit poster's website
silverfrost
Site Admin


Joined: 29 Nov 2006
Posts: 193
Location: Manchester

PostPosted: Sat Feb 25, 2017 3:40 pm    Post subject: Reply with quote

It will.
Back to top
View user's profile Send private message Visit poster's website
LitusSaxonicum



Joined: 23 Aug 2005
Posts: 2402
Location: Yateley, Hants, UK

PostPosted: Sat Feb 25, 2017 5:41 pm    Post subject: Reply with quote

Why not just 'Yes'?
Back to top
View user's profile Send private message
LitusSaxonicum



Joined: 23 Aug 2005
Posts: 2402
Location: Yateley, Hants, UK

PostPosted: Tue Feb 28, 2017 4:24 pm    Post subject: Reply with quote

Not palindromes, sorry, as understood by Brits who don't have a thing about Alaskan Bush People but who mastered ancient Greek at school.

'It will' was excessively prolix when 'Yes' would have done. The answer to 'When' is probably 'Soon'. Eventually it will be 'Now'.

Is it? It is! (which isn't, if you get my meaning.)

Eddie
Back to top
View user's profile Send private message
dpannhorst



Joined: 29 Aug 2005
Posts: 165
Location: Berlin, Germany

PostPosted: Tue Feb 28, 2017 4:36 pm    Post subject: Reply with quote

Sorry, I am not so familiar with your language. So I looked at Wikepedia for the meaning of Palindrome. Wikipedia says:

A palindrome is a word, phrase, number, or other sequence of characters which reads the same backward as forward, such as madam or racecar.

So I think:

Yes backward is sew

and

It will
backward is lliw ti

My original question was, when the Personal Edition 8.10 will be available? Today, tomorrow or later on?
Back to top
View user's profile Send private message Visit poster's website
dpannhorst



Joined: 29 Aug 2005
Posts: 165
Location: Berlin, Germany

PostPosted: Tue Feb 28, 2017 4:37 pm    Post subject: Reply with quote

Of cause:

Yes backward is sey
Back to top
View user's profile Send private message Visit poster's website
DanRRight



Joined: 10 Mar 2008
Posts: 2923
Location: South Pole, Antarctica

PostPosted: Wed Mar 01, 2017 2:53 am    Post subject: Reply with quote

When you get 8.10 or any further upgrades please do not forget to report all the problems with it. This way we users will debug it and make it perfect much faster. Otherwise sometimes it takes years for some hidden bug to expose itself. Do not forget also about your suggestions to improve compiler and debugger.
Back to top
View user's profile Send private message
LitusSaxonicum



Joined: 23 Aug 2005
Posts: 2402
Location: Yateley, Hants, UK

PostPosted: Wed Mar 01, 2017 3:20 pm    Post subject: Reply with quote

Paul,

Since you read every post, then I suspect that you didn't appreciate the difference between palindrome and Palin drome: the latter being a punning usage about a US political figure (I guessed) or one of the Monty Python team (more probable in retrospect).

My original post was an observation on brevity, for which you are famous (notorious?).

The whole point is will 8.10 be PE, yes, and when, soon. Even you can't be briefer than that! (I'll accept OK instead of Yes to prove that you can).

The second point is that a PE release opens up a whole set of extra testers, for example I use an obsolete Academic version of FTN95 to support some software in the department I retired from 5 years ago, and the current PE for my personal dabblings. While 8.10 isn't PE-ready I can't find any problems with it (Dan).

If you want the answer to the question: Which is more likely to find bugs:
(a) 1 tester working for X days
(b) N testers working for X/N days
The answer is probably (b). If you tack on (b) after (a) and ask will this do a better job than (a) or even (b) alone, the answer with a high degree of probability is 'yes', with the certainty increased along with N.

Every dilettante's favourite program is a test suite that cannot be simply reproduced at Silverfrost, and overall is run on a range of hardware that few single organisations can support.

An early release of the PE seems to me therefore to be in everyone's interest.

Eddie

PS. The briefest reply short of ignoring this is 'OK', but I suppose most of us would settle for a date.
Back to top
View user's profile Send private message
mecej4



Joined: 31 Oct 2006
Posts: 1899

PostPosted: Mon Mar 06, 2017 6:07 pm    Post subject: Reply with quote

Eddie, Now!

Today, FTN95 8.10 PE is available for download. I am pleased to find that most of the bugs that I reported have been fixed.

For the first time, I find that SDBG64 is usable, but it is still lacking features that I like the 32-bit debugger for. For example, I cannot set the font large enough for easy reading, nor can I set the background color.

It would be nice if the register window displayed the values in FPU registers, and if the call stack showed, in addition to routine names, line numbers or at least addresses.


Last edited by mecej4 on Tue Mar 07, 2017 11:36 am; edited 1 time in total
Back to top
View user's profile Send private message
Robert



Joined: 29 Nov 2006
Posts: 457
Location: Manchester

PostPosted: Tue Mar 07, 2017 10:21 am    Post subject: Reply with quote

Does the 32-bit version show line numbers in the call stack window?
Back to top
View user's profile Send private message Visit poster's website
mecej4



Joined: 31 Oct 2006
Posts: 1899

PostPosted: Tue Mar 07, 2017 11:38 am    Post subject: Reply with quote

No, but I wish it did! The information to do that seems to be in the EXE already, since the pop up after a program error shows the information in the traceback.
Back to top
View user's profile Send private message
Robert



Joined: 29 Nov 2006
Posts: 457
Location: Manchester

PostPosted: Tue Mar 07, 2017 11:48 am    Post subject: Reply with quote

I'll put it on the to-do list.
Back to top
View user's profile Send private message Visit poster's website
DanRRight



Joined: 10 Mar 2008
Posts: 2923
Location: South Pole, Antarctica

PostPosted: Wed Mar 08, 2017 3:56 am    Post subject: Reply with quote

The new 64bit 8.10 is fast and sometimes is much faster with /optimize option but optimization not always works sometimes crashing the code.

The old compiler was not completely fixed for all such kind of errors for years since I suspect it was difficult to demonstrate the cause for this on some reasonably small code for developers to work on error.

I'd urge users to try /opt and if you can minimize the source to write smaller demonstration program report it to Silverfrost.
Back to top
View user's profile Send private message
DanRRight



Joined: 10 Mar 2008
Posts: 2923
Location: South Pole, Antarctica

PostPosted: Sat Mar 11, 2017 10:58 am    Post subject: Reply with quote

Couple years back Davidb wrote assembler utilities Vec_Add_SSE, Vec_Sum_SSE ... to use SSE. As usually they were just embedded into Fortran text and recognized. They looked like this
Code:

! Assembly code is between code, edoc lines
    code
       movupd xmm7%, v            ; move v array to xmm7
       mov eax%, =x               ; address of x
       mov ecx%, =y               ; address of y
.................


Now 64bit compiler does not recognize them

Code:

[6942) movsd [ecx%], xmm0%        ; form y(1) = y(1) + a*x(1)
*** Error 29: Syntax Error
6966) movupd [ecx%], xmm0%       ; move xmm0 into next 2 doubles in y
*** Error 29: Syntax Error
*** Error 343: Unrecognised assembler mnemonic - MOVAPD
6976) movapd xmm1%, [eax%+16]    ; move next 2 doubles in x into xmm1
6999) movsd [ecx%], xmm0%
    10 ERRORS  [<VEC_ADD_SSE> FTN95 v8.10.0]


Any ideas how to resolve this issue ?
Back to top
View user's profile Send private message
JohnCampbell



Joined: 16 Feb 2006
Posts: 2615
Location: Sydney

PostPosted: Sat Mar 11, 2017 11:06 am    Post subject: Reply with quote

Dan,

FTN95 /64 provides new routines for this.
see ...\ftn95\doc\noteson64bitftn95.txt
Code:
SSE and AVX support
-------------------------------------------------------------------------------
FTN95 /64 creates machine code that makes some use of the SSE and AVX instruction
sets (see https://en.wikipedia.org/wiki/Streaming_SIMD_Extensions). Users can
also provide direct SSE/AVX support via CODE/EDOC statements in their code (see
below for further details).

Four "BLAS" type library routines (DOT_PRODUCT8@,DOT_PRODUCT4@,AXPY8@ and AXPY4@)
are also provided and these make direct use of the SSE/AVX instruction sets.
In addition, the library function USE_AVX@ can be called in order to instruct these
routines to use AVX rather than SSE when the CPU and operating system make this
possible.

REAL*8 FUNCTION DOT_PRODUCT8@(x,y,n)
REAL*8 x(n),y(n)
INTEGER*8 n

REAL*4 FUNCTION DOT_PRODUCT4@(x,y,n)
REAL*4 x(n),y(n)
INTEGER*8 n

SUBROUTINE AXPY8@(y,x,n,a)
REAL*8 x(n),y(n),a
INTEGER*8 n
(Y = Y + A*X)

SUBROUTINE AXPY4@(y,x,n,a)
REAL*4 x(n),y(n),a
INTEGER*8 n
(Y = Y + A*X)

INTEGER FUNCTION USE_AVX@(level)
INTEGER level
(Set level = 0 for SSE. Set level = 1 for AVX. The function returns the level that
will be used by the current CPU/OS.
The default level is 1 which means that AVX will be used when available otherwise
SSE. If USE_AVX@(1) is called before an ALLOCATE statement then the resultant
addresses will be 32 byte aligned. The USE_AVX@ level must be the same at a
corresponding DEALLOCATE.)

For example:

INTEGER(4),PARAMETER::n=100
REAL(2) DOT_PRODUCT8@,prod,x(n),y(n)
INTEGER USE_AVX@,level
! x = ...; y = ...
level = USE_AVX@(0)
prod = DOT_PRODUCT8@(x,y,n)
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 -> General All times are GMT + 1 Hour
Goto page 1, 2, 3  Next
Page 1 of 3

 
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