forums.silverfrost.com

Dan, I used 9.02 without /check or /undef.

FTN95 gives, if I am not mistaken, an incorrect warning:

WARNING S:\LANG\dan.F90 12: MOD!SPECIES is not ALLOCATABLE yet is used in an ALLOCATE ...

Dan, your program is almost working. All that you have to do is to make sure that subscript bounds are honored, or, equivalently, allocate arrays with sufficient size.

Here is a fixed-up version:
...

The following code contains a subroutine with a 1-dimensional array argument whose name is the same as that of an intrinsic function, INT.
subroutine elmhes(Nm,N,Low,Igh,A,Int)
implicit ...

The Zip file https://www.dropbox.com/scl/fi/h5dv3i9a4rr5lvz15g4fs/xfzero.zip?rlkey=ot6eqa8xfth5j7ovokdcypmyo&dl=0 contains two source files. The driver, fztest.f90, is just
program tfztest
im ...

The following is what is left after trimming a 25,000 LOC Fortran 95 program to pin down a suspected optimisation bug.

program labDObug
implicit none
integer, parameter :: nx = 5, n ...

When debugging with SDBG64, I sometimes see that when the source code pane has its width reduced using the mouse, parts of a long line of source code that are now beyond the right edge of the pane are ...

Bill, there is a way to make sure that needed initializations in one or more BLOCK DATA program are not skipped by the linker -- something that I learned from Eddie a few years ago.

In each BLOCK D ...

Please provide example code and instructions to produce and observe described behaviour.

The following code works as expected. Compile with /debug, link and open in the debugger.

! examine BLOC ...

The following test program fails to work correctly when built with FTN95 9.02.

program allocarg ! Expects compiler to support "(re)allocate on assignment"
impl ...

Kevin,

As you probably know, the more users with diverse PC hardware and Windows versions use your code, the more likely it is that bugs will be noted and fixed.

If you are able and willing to p ...

The short program below was constructed to display a problem that I had with building and running the Hydrotherm program ( https://volcanoes.usgs.gov/software/hydrotherm/ ) with FTN95, 32 or 64 bit.
...

When the following program is built with /64 /opt and run, the result is wrong -- a zero is printed instead of 34^2 = 1156.

module imod_m
implicit none
integer idir
end module

program t ...

Great news! I look forward to the release of the compiler with the fixes.

The FINDLOC intrinsic function was added in F2008, and it was added to the repertoire of FTN95 in 2022. The BACK optional argument was added to FTN95 in Nov. 2023. According to F2008 the required firs ...

Display compiler information, results (5 real numbers) and terminate (expected, normal)
Display compiler information and hang
Display compiler information, results and hang
Display pop-up for acces ...