comp.lang.ada
 help / color / mirror / Atom feed
From: Martin Krischik <krischik@users.sourceforge.net>
Subject: Re: please help - access and inheritence
Date: Tue, 09 Dec 2003 17:55:04 +0100
Date: 2003-12-09T17:55:04+01:00	[thread overview]
Message-ID: <1420570.hLiUgvdvap@linux1.krischik.com> (raw)
In-Reply-To: fc116fae.0312082158.2f8b32ae@posting.google.com

Mr. J. wrote:

I forgot the cast.

> 10x, but it still doesn't compiled :
> ==========================================
> for I in Arr'range loop
>          Process :
>             declare
>             Current_Vehicle : Jr.Vehicle.Vehicle'Class renames
> Arr(I).all;

Current_Vehicle : Jr.Vehicle.Vehicle'Class renames Jr.Vehicle.Vehicle'Class
(Arr(I).all);


>          begin
>             if(Has_Exceeded(Current_Vehicle)) then
>                Put_Line("Exceeded");
>             end if;
>          end Process;
>       end loop;

Might you, get yourself a good Ada Book because you have problems with basic
syntax problems while trying to do some advanced programing.

Or look at some working programs - just for enlightenment:

http://adacl.sourceforge.net/html/sarOAda-CommandLine__adb.htm#133_15

With Regards

Martin

-- 
mailto://krischik@users.sourceforge.net
http://adacl.sourceforge.net




      reply	other threads:[~2003-12-09 16:55 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-12-07  0:47 please help - access and inheritence Ratson Janiv
2003-12-07  7:14 ` tmoran
2003-12-07 18:44 ` Jeffrey Carter
2003-12-08  4:46   ` Mr. J.
2003-12-08 18:07     ` Jeffrey Carter
2003-12-08 19:05       ` Martin Krischik
2003-12-08 19:17     ` Martin Krischik
2003-12-08 18:50 ` Martin Krischik
2003-12-09  5:58   ` Mr. J.
2003-12-09 16:55     ` Martin Krischik [this message]
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox