comp.lang.ada
 help / color / mirror / Atom feed
From: "Steve" <nospam_steved94@comcast.net>
Subject: Re: Rename Problem
Date: Tue, 6 Mar 2007 19:47:16 -0800
Date: 2007-03-06T19:47:16-08:00	[thread overview]
Message-ID: <zOudnaVfluP8qHPYnZ2dnUVZ_ompnZ2d@comcast.com> (raw)
In-Reply-To: 1173197839.773371.261080@q40g2000cwq.googlegroups.com

"Ant" <yarzepol@hotmail.com> wrote in message 
news:1173197839.773371.261080@q40g2000cwq.googlegroups.com...
>I am trying to rename an array component, but no luck. Is this
> possible or am I just doing something wrong?
>

Here is an example of renaming an array component:

procedure Rename_Example is

  type index is range 1 .. 10;

  type Signals_Record is
    record
      junk : Integer;
    end record;

  type Message_Array is array( index ) of Signals_Record;

  msg  : Message_Array;
  msg1 : Signals_Record renames msg( 1 );

begin
  null;
end Rename_Example;

This is a complete example that compiles.  It may or may not do what you 
were attempting to do, since that is unclear from your example.

In the future please include a COMPLETE minimal example that may be 
compiled, or that you are attempting to compile.  There are a lot of helpful 
people that follow this newsgroup that are more than happy to help.

Regards,
Steve
(The Duck)

>
> TYPE message_array IS ARRAY (index) OF signals_record;
> msg : message_array;
>
> PACKAGE m1 IS NEW transmit_message (id, type);
>
> msg (1) : signals RENAMES m1.signals_record;
>
>
> Anthony
> 





      parent reply	other threads:[~2007-03-07  3:47 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2007-03-06 16:17 Rename Problem Ant
2007-03-06 16:53 ` Georg Bauhaus
2007-03-06 21:50   ` Ant
2007-03-06 23:21     ` Adam Beneschan
2007-03-07  1:11     ` Jeffrey R. Carter
2007-03-07  3:47 ` Steve [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