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,fcaba0762321938d
X-Google-Attributes: gid103376,public
From: mcc@tyrolia.cs.princeton.edu (Martin C. Carlisle)
Subject: Re: Help ADA and Assembly !!! :-(
Date: 1998/01/05
Message-ID: <68r88p$frf$1@cnn.Princeton.EDU>#1/1
X-Deja-AN: 313937371
References: <68omkm$orf$1@news2.isdnet.net>
Organization: US Air Force Academy, Dept of Computer Science
Newsgroups: comp.lang.ada
Date: 1998-01-05T00:00:00+00:00
List-Id: <comp.lang.ada>


In article <68omkm$orf$1@news2.isdnet.net>, jphe <jphe@hol.fr> wrote:
>Hi everybody i have a project that compare ada subprocedure and assembly
>subprocedure but i can't get in ADA the assembly .obj sub-procedure that i
>have made withe TASM could you help me about the use of Pragma import
>because i read the doc of Gnat and ADAGIDE but it doesn't recognize my .obj,
>i send my little source thanks..... JP  ( JPHE@HOL.fr )
>
>Exemple is a test of pragma import that must be works with calcul.obj but
>doesn't. It says udefinied reference to "calcul" ???

I believe you want something like the following:

procedure Test2;
pragma Import(Convention => Ada, Entity => Test2, Link_Name =>
  "calcul"); -- use whatever name is in .obj in place of "calcul"
             -- use Ada's name in place of Test2.
pragma Linker_Options("myobjfile.obj"); -- rename myobjfile to your name

--Martin
   
-- 
Martin C. Carlisle, Computer Science, US Air Force Academy
mcc@cs.usafa.af.mil, http://www.usafa.af.mil/dfcs/bios/carlisle.html
DISCLAIMER:  This content in no way reflects the opinions, standard or 
policy of the US Air Force Academy or the United States Government.