From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,d587466310393853
X-Google-Attributes: gid103376,public
From: dewar@merv.cs.nyu.edu (Robert Dewar)
Subject: Re: importing fortran routines to GNAT
Date: 1997/02/23
Message-ID: <dewar.856697845@merv>#1/1
X-Deja-AN: 220837425
References: <330DBC84.219B@msslac.mssl.ucl.ac.uk>
 <5eke6f$5tu@arktur.rz.uni-ulm.de>
Organization: New York University
Newsgroups: comp.lang.ada
Date: 1997-02-23T00:00:00+00:00
List-Id: <comp.lang.ada>


Joerg said

<<The third parameter is the name to be found in the object file as far as I
understand this materia. So in your case a

    pragma import(Fortran,subsum, "_subsum");

should work.>>

NO, that's wrong, the *fourth* parameter is the actual external name, so it
is better to write

    pragma Import (Fortran, subsum, Link_Name => "_subsum");

The third parameter is the external name, and should look exactly like
the name looks in Fortran, including using the proper case, but not
adding junk characters.

Sounds like there is a bug in some particular configuration of GNAT. This
should be reported to report@gnat.com (it is especially important in a
case like this to give precise versions of everything (GNAT, Fortran
compiler, operating system, machine).