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.9 required=5.0 tests=BAYES_00 autolearn=ham autolearn_force=no version=3.4.4 X-Google-Thread: 103376,ac6f6c30c45f808a X-Google-Attributes: gid103376,public X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news1.google.com!news2.google.com!proxad.net!freenix!news.wanadoo.fr!news.wanadoo.fr!not-for-mail Sender: obry@PASCAL Newsgroups: comp.lang.ada Subject: Re: Ada equivalent for C-pointer? References: <41E7F653.2F899F47@alfred-hilscher.de> From: Pascal Obry Organization: Home - http://www.obry.net User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3 Date: 15 Jan 2005 17:27:03 +0100 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii NNTP-Posting-Host: 82.120.19.136 X-Trace: 1105806423 news.wanadoo.fr 25778 82.120.19.136:2893 X-Complaints-To: abuse@wanadoo.fr Xref: g2news1.google.com comp.lang.ada:7816 Date: 2005-01-15T17:27:03+01:00 List-Id: Nick Roberts writes: > For example, if there is a C function defined thus: > > int wibble(int *n); > > then in Ada you can declare: > > function Wibble (Number: in out Interfaces.C.int); > pragma Import(C,Wibble,"wibble"); > > and it should work. (Obviously, you must link the C functions in somehow.) I don't think so. Here Number will be passed by value, no? And you also need the returned value ;) So, you probably want: function Wibble (Number: access Interfaces.C.int) return Interfaces.C.int; pragma Import(C,Wibble,"wibble"); Pascal. -- --|------------------------------------------------------ --| Pascal Obry Team-Ada Member --| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE --|------------------------------------------------------ --| http://www.obry.org --| "The best way to travel is by means of imagination" --| --| gpg --keyserver wwwkeys.pgp.net --recv-key C1082595