Re: [Q] Returning Strings From A Function

[john@assen.demon.co.uk (John McCabe)]

Hello all,

To everyone who responded thank you. You have put my mind straight.

I was aware that the method everyone described i.e.

declare
   File_Name : constant string := Text_IO.Name (File);
being
   :
   :
end;

would be a solution, but I felt sure there was another way to do it so
that I could declare File_Name as an object of a string type e.g.:

type File_Name_Type is new String (1..12);

then use:-

procedure ...

   File_Name : File_Name_Type;

begin
   :
   File_Name := Text_IO.Name (File);
   :
end...

or something similar. But unfortunately this is obviously not
possible.

Thanks again anyway.


Best Regards
John McCabe <john@assen.demon.co.uk>