Re: Optimising string handling in application

[tmoran@acm.org]

>   Replace_Callsign_In_Msg
>     (Msg             => Loc_Insert_Msg.Data(2..Loc_Insert_Msg.Data'Last),
>Can I assume that 'First of Msg inside Replace_Callsign_In_Msg =1?

  It depends on whether the formal parameter is constrained or
unconstrained.  This program prints " 13 3"

with ada.text_io;
procedure testp is
  subtype teens is integer range 13 .. 19;
  subtype constrained is string(teens);
  x : string(3 .. 9);
  procedure p(c : constrained; u : string) is
  begin
    ada.text_io.put_line(integer'image(c'first) & integer'image(u'first));
  end p;
begin
  p(x,x);
end testp;