Re: Strange warning message

[Jacob Sparre Andersen <jacob@jacob-sparre.dk>]

Reinert <reinkor@gmail.com> writes:

> "warning: useless assignment to "test1", value never referenced"

Yes.

> procedure test1k is
[...]
>   test1 : array(1..1) of access test1_t;
> begin
>   for e of test1 loop
>       e := new test1_t;
>   end loop;
>
>   --  Commenting out this statement makes the warning disapipear:
>   test1 (1) := new test1_t;
> end test1k;

As the warning says, you don't reference the variable "test1".

If that is on purpose and you use GNAT, you can attach the aspect
"Unreferenced" to "test1".

Greetings,

Jacob
-- 
"Being an absolute ruler today was not as simple as people
 thought.  At least, it was not simple if your ambitions
 included being an absolute ruler tomorrow."