[Scilab-Dev] use basout in fortran program

[ycollet at freesurf.fr]

Hello,

I use first f2c to convert my code to c
Then, I use ilib_for_link. Under windows.
The include "stack.h" is here, just after the SUBROUTINE keyword.
Everything works fine without the call basout (with write(6,...))
But once I add the call basout, scilab hangs.
I think the character buffer is large enough to handle the formated strings.
The other difference I see wrt the fortran code in the optimization
toolbox is the shape of the format:

720   FORMAT (/5X,25HTHREE-POINT INTERPOLATION)

there is no quote. Is this needed ? Maybe to produce some kind of 0
terminated strings ?

YC


> Hi,
>
> How do you build your fortran code ?
>
> With scilab ilib_for_link function or a separate makefile ?
> Windows or linux ?
>
> Fortran code built with intel fortran or f2c ?
>
> iop_ symbol is exported.
>
> If you want to use iop from fortran, you need to include "stack.h"
>
> Allan
>
>
> -----Message d'origine-----
> De : ycollet at freesurf.fr [mailto:ycollet at freesurf.fr]
> Envoyé : mardi 5 mai 2009 16:21
> À : dev at lists.scilab.org
> Objet : Re: [Scilab-Dev] use basout in fortran program
>
> I included a small test in my fortran code:
>
>       WRITE(6,666) IO
>       WRITE(6,666) WTE
>
>  666  FORMAT (5X,'PARAM =',I5)
>
> And, when I launch the good scilab command, it hangs at WRITE(6,666) WTE
> The WTE variable is defined in the stack.h iop common.
> It seems that I can't access wte ?
> This is certainly a link problem. How do I link to the iop.wte common
> variable ?
>
> YC
>
>
>
>
>