This is the mail archive of the
cygwin@sources.redhat.com
mailing list for the Cygwin project.
Re: C calls to Fortran with strings
- To: erik dot nim at risoe dot dk
- Subject: Re: C calls to Fortran with strings
- From: "Ehud Karni" <ehud at unix dot simonwiesel dot co dot il>
- Date: Mon, 20 Nov 2000 17:58:07 +0200
- CC: cygwin at sourceware dot cygnus dot com
- Organization: Simon & Wiesel Insurance agency
- References: <7F6BCF6B9307D311980C0090273C746C020CBAD4@cssrv1>
- Reply-to: ehud at unix dot simonwiesel dot co dot il
On Mon, 20 Nov 2000 16:29:32 +0100, erik.nim@risoe.dk wrote:
>
> I am using the gcc compiler under Cygwin on a NT platform for applications
> where I call Fortran subroutines from C code. This is working smoothly with
> one strange exception: If more than one string are present in Fortran
> subroutines the program crashes. Apparently everything works with ONE string
> only. The following simple example illustrates the problem:
[snip]
> extern void sub1_(char *s1, unsigned int);
> extern void sub2_(char *s1, unsigned int, char *s2, unsigned int);
[snip]
> SUBROUTINE SUB1(S1)
[snip]
> SUBROUTINE SUB2(S1, S2)
If my memory serves me right, you have defined the SUB2 wrongly.
The correct definition should be:
extern void sub2_ (char *s1, char *s2, unsigned l1, unsigned l2);
As I recall the string lengths always come after all the real formal
parameters (not directly after the string pointer).
(I can't check it at the moment so please check it and report back).
Ehud.
--
@@@@@@ @@@ @@@@@@ @ @ Ehud Karni Simon & Wiesel Insurance agency
@ @ @ @@ @ Tel: +972-3-6212-757 Fax: +972-3-6292-544
@ @ @ @ @ @@ (USA) Fax and voice mail: 1-815-5509341
@ @ @ @ @ @ Better Safe Than Sorry
http://www.simonwiesel.co.il mailto:ehud@unix.simonwiesel.co.il
--
Want to unsubscribe from this list?
Send a message to cygwin-unsubscribe@sourceware.cygnus.com