Re: Beginer problem: variable array size

[Brian.Gaffney@myrealbox.com (Brian Gaffney)]

"Nacho" <NACHANGA@terra.es> wrote in message news:<am2bq5$8fl$1@nsnmpen2-gest.nuria.telefonica-data.net>...
> That does not resolve the problem. I need to change the size of the array
> after it has been created. With your solution once array_called_p has been
> created it will never change its size.
> 
Larry just didn't post enough of the Ada code.  Here is a complete
program that shows how to do what you want:

   with Gnat.IO;
procedure Var is
   Variable : Integer := 50;
   type Int_Array is array (Integer range <>) of Integer;
begin
   for i in 1 .. 2 loop
      declare
         P : Int_Array(1..Variable) := (others => 0);
      begin
         for J in P'range loop
            Gnat.IO.Put(P(J)'img);
         end loop;
         Gnat.IO.New_Line;
      end;
      Variable := 80;
   end loop;
end Var;

Prints a row of 50 0's followed by a row of 80 0's.