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,96424a7ea58e8817 X-Google-Attributes: gid103376,public From: "Paolo M. Pumilia" Subject: Re: help on interfacing with fortran Date: 2000/01/22 Message-ID: <388994BF.B4B52F29@cstc.org>#1/1 X-Deja-AN: 576095629 Content-Transfer-Encoding: 7bit References: <867gr5$c1h$1@nnrp1.deja.com> To: Ed Falis X-Accept-Language: en Content-Type: text/plain; charset=us-ascii X-Complaints-To: usenet@stargate1.inet.it X-Trace: stargate1.inet.it 948540399 109504 212.239.48.56 (22 Jan 2000 11:26:39 GMT) Organization: CSTC Mime-Version: 1.0 Reply-To: pumilia@est.it NNTP-Posting-Date: 22 Jan 2000 11:26:39 GMT Newsgroups: comp.lang.ada Date: 2000-01-22T11:26:39+00:00 List-Id: I tried to use your perl conversion script, but it seems the result is not yet satisfying. Here are my first observations: - The function icarry was strangely defined as Real rather than integer - The vector defined in the statement DIMENSION V(65) is not recognized, V being defined as a simple Double variable. - The long line of the data assigned to V is not split. GNAT complains that such line is too long - The stemement DATA AA,B,C/12.37586d0,.4878992d0,12.67706d0/ 1 C1,C2,PC,XN/.9689279d0,1.301198d0,.1958303d-1,2.776994d0 is not properly treated. After the output from f2a.pl has been fixed by hand, GNAT terminates with error: > rnor.adb:36:21: missing operand > rnor.adb:113:12: reserved word "mod" cannot be used as identifier > gnatmake: "rnor.adb" compilation error Line 36 is: XN(i) := mod (iabs(idum) * i, 37); Line 113 is: J := MOD(IABS(I), 64) + 1; thank you for your help, anyway Pol