Re: Large strings in ADA

[Florian Weimer <fw@deneb.cygnus.argh.org>]

Johan Groth <jgroth@xpress.se> writes:

>    for I in 1 .. 1600 loop
>       Append_To_Msg(Str.Info, Basic_Natural(Str.Len), Msg, Last);
>       if (I mod 100) = 0 then
>          Put(" " & Integer'Image(I));
>       end if;
>    end loop;

For example, the GNAT implementation of Unbounded_String, results in
four allocator calls and copy operations per iteration, and this is
expensive.  Perhaps you should switch to a different string-like type
which preallocates storage.