forums.silverfrost.com

This compiler error occurs in the following fragment

! Compile fails with FTN95 /64
!
subroutine broken
integer i,j
character(3),parameter :: noyes(2) ...

Not in standerd fortran. It lacks a COMEFROM statement Wink

You may find this amusing: http://en.wikipedia.org/wiki/COMEFROM

Thanks. I have also asked the same question in comp.lang.fortran under "is this f95-compliant".

1. The <> looks like a fortran vendor extension (whose?) meaning .ne. or /=. Make this change (and compile the other USEd modules) and the files compile. <> is non-standard.
2. The messa ...

This example won't compile.I'm using ftn95 6.20. gfortran and the Lahey f95 checker say its OK (but insist on sequence for TYPE_A & TYPE_B, required by example_A_T and example_B_T ).
The compilat ...

I have discovered the cause of the floating point stack fault.
I set the environment variable SALFENVAR=MASK_UNDERFLOW.
Removing this made the crash go away.

I think that I set this in an attem ...

There are multiple copies/versions of salflibc.dll on the disk from previous builds/releases of our program. I have checked that, if there is a salflibc.dll in the current directory, it is the same as ...

Further digging. I have found another PC where slink falls over with an AV.
This is the dump of the error

##########
Runtime error from program:c:\salford\ftn95\slink.exe
Access Violation
The i ...

0. I've got 32-bit XP, SP3, ft995 5.50. It's a Dell Dimension 8250, so its a few years old.
1. On my PC, slink crashes with AV (fgetc) when in interactive mode (it writes the * to the console, then c ...

Not built on a 64-bit machine and built with regular ftn95, but the library has been built into a program which runs on 64-bit Vista.
First, select and download a version from netlib (http://www.netl ...

It's ftn95-compiled from downloaded source obtained from Netlib. I guess, I'll have to persuade my management to stump up for Win64 box.
Although it happens in real life, it's always bad style to get ...

A client is running our Win32 software on Win64 XP. Are there are any issues with floating point underflow? Our program has generated an underflow and crashed. Currently, we don't have Win64 for testi ...

Also, this call provides the expected result

call testsub((/(boxp(0,'*'),i=1,0)/))

as does this

type(boxp) z(1:0)
call testsub(z)

So I have a work around

FWIW, the problem is present with ftn95 5.10, so not a regression.

in ftn95 5.20.1, the third call with zero-size array of derived type appears as length 1 in the subroutine body. I really want size to tell me 0. This feature works for simple variables.

module tes ...