Re: [Q] Problem with Array Concatenation?

[mheaney@ni.net (Matthew Heaney)]

In article <ED611s.5yM.0.-s@inmet.camb.inmet.com>,
stt@houdini.camb.inmet.com (Tucker Taft) wrote:


>:    SA : AT;
>:    DA : AT;
>:    subtype Slided is AT (1 .. 50);
>
>Now *this* is not legal Ada (83 or 95).  You can't re-constrain
>a constrained array (sub)type.

Oops!  Tuck is, of course, correct.  I guess the compiler in my head has a
few bugs, eh?

If you're stuck with a constrained array type (perhaps it's a global type),
then you can still do the sliding solution locally by casting the array
slice into locally declared unconstrained array type:

   type AT is array (1 .. 100) of T;
...
   type Unconstrained_AT is array (Positive range <>) of T;

   SA, DA : AT;

   subtype Slid is Unconstrained_AT (1 .. 50);
begin
   ...
   DA := AT (Slid (SA (51 .. 100)) & Slid (SA (1 .. 50)));

Won't that work?

--------------------------------------------------------------------
Matthew Heaney
Software Development Consultant
<mailto:matthew_heaney@acm.org>
(818) 985-1271