Re: Reading data from file

[Laurent <daemon2@internet.lu>]

Am Dienstag, 4. März 2014 22:42:37 UTC+1 schrieb Niklas Holsti:

> Also try to configure your news-reader to break the lines in your 
> postings to some reasonable length, say 70 characters. Commenting is
> difficult if you post messages with very long lines, at least in my
> news-reader (Thunderbird).

I don't use a news-reader so difficult to configure.
I will try to limit my postings to 1/2 the width.

>So the problem is that after reading the ID you must 
>move the read point to the start of the "name" line. 
>Add a Skip_Line between the Get(ID) and 
>the Get_Line(Name). 

The Skip_Line works only if I use it together with:

Ada.Text_IO.Get (File => Import_File, Item => Temp_Record.Name);

and this only if I put spaces after "test" to a total length of 30 chars.
I suppose the spaces are needed because the name is defined as:

   MaxName : constant Positive := 30;
   subtype NameType is String (1 .. MaxName);

Get_Line w/ or w/o Skip_Line fails with the same error 
independently of the number of spaces behind the name.

Even tried this:

declare 
       S : String := Ada.Text_IO.Get_Line(File => Import_File);
        begin
            Temp_Record.Name (1 .. S'Length) := S;
         end;

Works w/o the (File => Import_File). Then it waits for
keyboard input and everything is fine. If it tries to read
from file then not.

Until now I like Ada very much but this odd behavior
of Ada.Text_IO.Get/Get_Line drives me crazy.

The integer/enumeration getters aren't so picky.

@ Mike H

>If you don't believe me, try putting a non-numeric 
>character in the "ID" line.

Doesn't even need to be non-numeric. ID needs to be
in range 1111..9999.

The Insert procedure from keyboard is robust and 
won't continue until every field is entered correctly.

Just began the read from file procedure. Would be
happy if that worked. Then I will take care of robustness.

>Do not take that as a criticism ...

I'm an noob so criticism is quite welcome. I don't
earn my money as programmer and probably this
never happens so there are a lot of things I don't know. 
It will help me improve my code, style or whatever.

Thanks

Laurent