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, MSGID_RANDY autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,83d7abe924220a12 X-Google-Attributes: gid103376,public From: Ted Dennison Subject: Re: HOW? item_ptr := item'access Date: 2000/04/12 Message-ID: <8d1uhn$gc7$1@nnrp1.deja.com>#1/1 X-Deja-AN: 610136444 References: <38F34D00.FA32AC68@mindspring.com> X-Http-Proxy: 1.0 x41.deja.com:80 (Squid/1.1.22) for client 204.48.27.130 Organization: Deja.com - Before you buy. X-Article-Creation-Date: Wed Apr 12 13:43:22 2000 GMT X-MyDeja-Info: XMYDJUIDtedennison Newsgroups: comp.lang.ada X-Http-User-Agent: Mozilla/4.7 [en] (WinNT; I) Date: 2000-04-12T00:00:00+00:00 List-Id: In article <38F34D00.FA32AC68@mindspring.com>, Al Johnston wrote: > procedure Close(Database : in out Database_Typ) is > t_DBase_Ptr : Database_Ptr_Typ := Database'access; <<< ----- > compiler complans > begin > PDB_C_Lib.pdb_close(t_DBase_Ptr); > end Close; > end PDB; So "Close" is only ever called from C? In that case, why not change that parameter to "Database_Ptr : in Database_Ptr_Typ"? It does the same thing from the C side, but gives you the type you need to work with on the Ada side. -- T.E.D. http://www.telepath.com/~dennison/Ted/TED.html Sent via Deja.com http://www.deja.com/ Before you buy.