comp.lang.ada
 help / color / mirror / Atom feed
From: Robert A Duff <bobduff@shell01.TheWorld.com>
Subject: Re: Help needed - Upper Bound of an array - Question.
Date: Tue, 07 Feb 2012 16:22:15 -0500
Date: 2012-02-07T16:22:15-05:00	[thread overview]
Message-ID: <wcc4nv249vc.fsf@shell01.TheWorld.com> (raw)
In-Reply-To: d0f24231-9160-4bbd-8286-6d219b8eb296@x19g2000yqh.googlegroups.com

adacrypt <austin.obyrne@hotmail.com> writes:

> This is my declaration.
>
>  SUBTYPE Index_30 IS Integer RANGE -500000 .. 500000;

Why 30?  Why not a new type?

>   TYPE I_CoefficientsNumArray IS ARRAY(Index_30) OF Integer;
>   I_Num : I_CoefficientsNumArray;
>   -- counts the occurences of the j coefficients of the ciphertext.
>
> Question : can I use your 'big array' declaration procedure in Ada-95
> just as you have typed here ? that would be great - will it work just
> by replacing the present declaration with this? do I type in as a
> straight crib just like that, regards - adacrypt

I suggest you figure out how to increase the stack size,
so you don't have to use pointers.  It's in the GNAT
documentation.

If that's impossible, and you want to use pointers, you
can avoid the issue of adding ".all" all over the place:

    I_Num_Pointer : I_CoefficientsNumArray_Pointer := new ...;
    I_Num : I_CoefficientsNumArray renames I_Num_Pointer.all;

- Bob



  parent reply	other threads:[~2012-02-07 21:22 UTC|newest]

Thread overview: 16+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-02-07 14:41 Help needed - Upper Bound of an array - Question adacrypt
2012-02-07 15:00 ` Yannick Duchêne (Hibou57)
2012-02-07 15:04 ` Mark Lorenzen
2012-02-07 15:08 ` Ludovic Brenta
2012-02-07 15:27   ` Yannick Duchêne (Hibou57)
2012-02-07 15:59   ` adacrypt
2012-02-07 16:13     ` Gautier write-only
2012-02-07 17:30     ` Jeffrey Carter
2012-02-07 19:51       ` tmoran
2012-02-09  3:31         ` Randy Brukardt
2012-02-07 18:22     ` Ludovic Brenta
2012-02-07 20:42       ` adacrypt
2012-02-07 18:56     ` Georg Bauhaus
2012-02-07 21:22     ` Robert A Duff [this message]
2012-02-07 15:33 ` Álex R. Mosteo
2012-02-07 22:08 ` Jerry
replies disabled

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