Re: Arrays and Access types...

[tmoran@acm.org]

>left, right, start : My_Array_Ref;
> ...
>    left  := start(start'first .. 100); -- that doesn't work!
  "left" is not an array, so you can't assign an array to it - it's an
access type.  I presume you don't want to create a new string with an
initial value that is a copy of start(start'first .. 100), but you want
"left" to rename the leftmost part of "start", and you would prefer to
do this without access values.
  start : string(1 .. 200); -- or whatever
  first_blank:natural;
  left : string renames start(start'first .. 100);
begin
  first_blank := ada.strings.fixed.index(left, " ");  -- assume > 1
  declare
    leftmost_word : string renames left(left'first .. first_blank-1);
  begin
    ...
If you need to divide it into N substrings, where N is not known at
compile time, you'll want a loop or a recursive procedure, of course.