need a little string hint...

["mferracini" <maurizio.ferracini@gmail.com>]

i need to read from a file "config.sys" host&port number.
but i have a problem with host...

if i call: Get_Host_By_Name ("localhost") it work fine,
i i use the string read from the file don't work.

an hint?

grazie.

-------------------------------------------------------------

procedure Client is
   Server     : Sock_Addr_Type;
   Config     : Ada.Text_Io.File_Type;
   Host       : String (1 .. 20)      := (others => ' ');
   Port_Value : String (1 .. 20)      := (others => ' ');
   Last       : Natural               := 0;
   Port       : Port_type             := 0;

begin
   --Inizializza
    --leggi da config
   Ada.Text_Io.Open(
      File => Config,
      Mode => Ada.Text_Io.In_File,
      Name => "config.ini"); --case sensitive?

   Ada.Text_Io.Get_Line(
      File => Config,
      Item => Host,
      Last => Last);

   Ada.Text_Io.Get_Line(
      File => Config,
      Item => Port_Value,
      Last => Last);
   Ada.Integer_Text_Io.Get(Port_Value,natural(Port),Last);

    --open socket
   Initialize(False); --true??
   Server.Addr := Addresses (Get_Host_By_Name (host), 1);
   Server.Port := Port;
   Ada.Text_Io.Put_Line("OK");