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,cab230a084a14384
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news1.google.com!newsread.com!news-xfer.newsread.com!newspeer.monmouth.com!newshosting.com!nx02.iad01.newshosting.com!208.49.83.146.MISMATCH!atl-c08.usenetserver.com!news.usenetserver.com!pc01.usenetserver.com!ALLTEL.NET-a2kHrUvQQWlmc!not-for-mail
Date: Mon, 25 Jul 2005 08:18:13 -0500
From: "Marc A. Criley" <mcNOSPAM@mckae.com>
User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: ++ of C in ada
References: <1122228917.377279.262690@g47g2000cwa.googlegroups.com>
In-Reply-To: <1122228917.377279.262690@g47g2000cwa.googlegroups.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <4b7bc$42e4e68b$4995209$14608@ALLTEL.NET>
X-Complaints-To: abuse@usenetserver.com
Organization: UseNetServer.com
X-Trace: 4b7bc42e4e68ba13cf7ac14608
Xref: g2news1.google.com comp.lang.ada:3751
Date: 2005-07-25T08:18:13-05:00
List-Id: <comp.lang.ada>

nicolas.b wrote:
> How can i implement the operator ++ in ada :
> 
> type T_Ptr is access all T_Item;
> How can i implement : procedure Increment (Ptr : in out T_Ptr);
> thanks
> 

See package Interfaces.C.Pointers.  Section B.3.2 in the Ada LRM 
(http://www.adapower.com/rm95/RM-B-3-2.html).

Think twice before going with this approach, though.  Is it really 
necessary, or are you just carrying through a C/C++ idiom?

-- Marc A. Criley
-- www.mckae.com
-- DTraq - XPath In Ada - XML EZ Out