forums.silverfrost.com

Steve · Joined: 23 Feb 2007 Posts: 73

For many years we have had no problem with calling our fortran subroutines and functions. We have had no problem calling external functions from DLLs be they written in fortran or Delphi etc.

Now, the roles have been reversed and the main app is Delphi which needs to call the fortran routines via a DLL. This we have created and the Clearwin+ dialogs, for example, are created fine. The majority of the fortran code still works - it would be a nightmare to consider re-writing it - but the odd routines crash the program. Why ?

The fortran LINKER had used to produce dozens of warnings about the sizing of COMMON areas. This was never a problem when the program was driven by fortran, but is it a problem now that the fortran is a DLL ? I have spent a few hours aligning all the 'offending' COMMON areas ....but still, certain routine calls from the DLL crash the program.

In more detail : Delphi calls a controlling fortran routine which then decides which SUBROUTINE to then call. There is no issue with calling this initial controlling routine. It is thereafter, further down the chain of routine calls within the fortran environment that crashes. Routines that have previously been called and processed fine, suddenly are not able to be accessed.

Paul, et al, do any of you have experience of this problem ? Thanks in advance.

Steve

PaulLaidler · Posted: Wed Mar 04, 2015 8:23 pm Post subject:

Sorry. I don't have anything useful to contribute to this.

DanRRight · Posted: Fri Mar 06, 2015 10:52 pm Post subject:

Try mask_underflow@ at the beginning of Fortran code

mecej4 · Joined: 31 Oct 2006 Posts: 1886

Steve:

mecej4 · Joined: 31 Oct 2006 Posts: 1886

Please delete this post.

mecej4 · Joined: 31 Oct 2006 Posts: 1886

Please delete.

mecej4 · Joined: 31 Oct 2006 Posts: 1886

Please delete.

mecej4 · Joined: 31 Oct 2006 Posts: 1886

Sorry for the multiple posts. I received a PhP error, along with a suggestion to retry, which I followed.

"Ran into problems sending Mail. Response: 421 Server is busy, try again later.

DEBUG MODE

Line : 124
File : smtp.php"

Administrator: please remove all but one copy. Thanks.

PaulLaidler · Posted: Sat Mar 07, 2015 4:01 pm Post subject:

Is there not a button that deletes your own posts?
I have one and I do not have administrator access to the forum.

mecej4 · Joined: 31 Oct 2006 Posts: 1886

There is no delete button, not even a grayed-out, inactive one.

The administrator may need to give specific users delete permission in their profiles, but this is just a guess.

PaulLaidler · Posted: Sat Mar 07, 2015 7:35 pm Post subject:

For me the delete button is an x next to an button with "edit" on it but it looks like it does not stay there for long.

mecej4 · Joined: 31 Oct 2006 Posts: 1886

I do see the button with "Edit" on it and to the left of the word a small icon of scissors cutting paper. When I hover the mouse over the button a small pop-up shows "Delete/Edit", but clicking on the button opens up the editing page with no place to specify "delete".

Steve · Joined: 23 Feb 2007 Posts: 73

Thanks for your comments.

Turns out that stack overflow was happening and to overcome problem it was necessary to make local variables static. Delphi must have a lower stack size than the default Salford environment.

Incidentally, when using a LNK script file, is there any way to inform SLINK an increased stack size ? Using the 'stack' option keeps returning an error message.

PaulLaidler · Posted: Mon Mar 09, 2015 7:39 am Post subject:

See the help file ftn95.chm at Win32 platform->Using the linker->Reference->Interactive mode....

stack reserve [,commit]