forums.silverfrost.com

Paul, thanks for the rapid resolution of the issue.

Eddie, please note that the index variable i is not defined when the IF clause is evaluated; given that error, an extension does not make sense. ...

The following test program contains a syntax error, as shown in the end-of-line comment. FTN95 8.70 compiles the program to an EXE when the /opt option is specified, with or without /64.

program ts ...

As you can read in the documentation ( https://silverfrost.com/ftn95-help/x64/intro.aspx ), FTN95 permits you to specify KIND=7 for integer variables, which are then treated as KIND=3 for 32-bit progr ...

When one tries to compile the program below with FTN95 Version 8.70, an internal error occurs.

program charset
implicit none
integer i
character :: alfbet(26) = [ ...

Ah, I had not noticed that "allocate on assignment" was present in 8.70 -- I downloaded the new version quite recently. I'll try it out on examples that use this feature.

Thanks.

No, Paul, I meant the feature that causes a variable declared as ALLOCATABLE to become allocated when a value is assigned to it. The details are spelled out in the Fortran 2018 Standard ( Section 9.7. ...

Paul,

Each new temporary array that is introduced to overcome this limitation may require the addition of declaration, allocation and deallocation statements for that array.

In other threads we ...

Paul,

No problem at all, it was just a minor issue that I knew that you would take care of once it was reported.

Happy New Year!

FTN95 V 8.70, with or without /64, and /check or /checkmate, and in addition /check_alias, when compiling the third subroutine in file http://elib.zib.de/pub/elib/codelib/nlscon/nlscon.f , lines 1203 ...

very interesting. Exactly what i'm looking for. i wonder if it would understand the FTN95 stack if it was available in a DLL... :wink: !

K

For such routines to work, the compiler should issue ...

Compaq Fortran (two decades ago) and Intel Fortran (currently) provide a subroutine TRACEBACKQQ that serves the purpose quite well. Optional arguments are provided to allow the program to print out a ...

Thank you, Paul.

The FTN95 8.70 help file contains descriptions of the non-standard intrinsic functions INVALID_FLOAT@ and INVALID_DOUBLE@, but I do not see them in the online documentation at https://silverfrost.com/ ...

John, the '2' is just a continuation mark in column 6, and is not material to the error.

If the source file had been free-form Fortran, and the two lines had been unfolded into a single line, the ...

Eddie may be on to something!

Decades ago, there was a tongue-in-cheek recommendation that we should drive on the left in the northern hemisphere (and on the right in the southern hemisphere) to d ...