forums.silverfrost.com

[Anonymous]

Hello,

my application crashes when doing a simple WRITE(6,'(A)') 'Test' in a function.

I have checked that the result of this function is never written directly
i.e. WRITE(*,*) MyFunction() do not exist.

When the error occurs I have the following call-stack:

Salford.Fortran.RTLibrary.RuntimeError(Int32 n)
Salford.Fortran.RTLibrary1.displayError(int,<ptr>char,enumÄlogical)(Int32 errornumber, SByte* lname, Int32 syserror)
Salford.Fortran.RTLibrary1.errorHandler(int,<ptr>char,enumÄlogical)(Int32 errornumber, SByte* lname, Int32 syserror)
Salford.Fortran.RTLibrary1.beginIO(enumÄActionCode)(Int32 action)
Salford.Fortran.RTLibrary1.parseEntryCode(unsignedÄint,<ptr>void,int,enumÄActionCode)(UInt32 code, Void* value, Int32 stringlength, Int32 action)
Salford.Fortran.RTLibrary1._IniWrSeqFrmC(Int32 code, SByte* value, Int32 stringlength)
MyLib.MyFunction()
…

Is it possible that an error in my WRITE statement triggers the function displayError that fails to display the real error because it appens in an I/O statement (recursive I/O statements) and finally crashes with this error?

Thanks.

[PaulLaidler]

It is simpler if you reduce the program to a few lines and post a "working" program that demonstrates the problem.

[Anonymous]

Alright I will try to isolate the problem but it is not systematic then I am not sure to succeed.
Thanks.

[JohnHorspool]

L.E.

I reported this problem on 25th October 2005

My case involved an OpenGL graphics screen refresh which required information to be written to a text variable prior to being displayed. I was not able to isolate the problem or provide a small sample code. The problem appears to occur randomly. Limiting the scope of the graphics refresh, eased the problem but was not a cure, which I found frustrating.

best of luck ! :confused:
_________________
John Horspool
Roshaz Software Ltd.
Gloucestershire