forums.silverfrost.com

Update on 19 May 2024:

The two test programs posted above (grist.f90 and gcgtst.f90) work correctly with FTN95 version 9.03.

Thanks to Silverfrost for enhancing the compiler to enable the ASSOCI ...

Thank you, I checked out the new version and it works.

I posted this bug report over two months ago.

RSVP!

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 ...