Re: can one create an array of a size determined by a constant value of a function?

[Pascal Obry <pascal@obry.net>]

Le 04/02/2012 12:00, Nasser M. Abbasi a �crit :
> Is it possible to do something like this in Ada?

Yes, easier and better and since 1983 :)

   subtype Size is Positive range 1 .. 1_024;

   function Spaces (N : in Size) return String;
   --  Returns a string with N spaces

   function Spaces (N : in Size) return String is
      V : String (1 .. N) := (others => ' ');
   begin
      return V;
   end Spaces;

N is not known at compile time and Spaces can be called by any other
part of the application with any value of N.

Note that in the above routine I have declared V to make it clear that
an array with a variable length can be declared, but we can simplify
this by writing:

   function Spaces (N : in Size) return String is
   begin
      return String'(1 .. N => ' ');
   end Spaces;

Pascal.
  PS: all this code has not been compiled!

-- 

--|------------------------------------------------------
--| Pascal Obry                           Team-Ada Member
--| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE
--|------------------------------------------------------
--|    http://www.obry.net  -  http://v2p.fr.eu.org
--| "The best way to travel is by means of imagination"
--|
--| gpg --keyserver keys.gnupg.net --recv-key F949BD3B