file lines reading

[srinukasam]

hi to all
iam trying read file for simulation data , that is having multiple lines.
one line for one set of data( second line again new inputs to all).
when iam trying to read this it only reads the first line .in my file
presently i have 2 lines( 2 sets of inputs).

my procedure to read file is..
in this procedur do i need to increase the line openly when i call next
time..or it will take care of by line type. and i have readbit and
readstring procedures , they are fuctioning well..
please mail me some ideas.

procedure readpatternline(file patternfile:text;
string1,string2,string3,string4,string5,string6
ut bit;
string7,string8,string9,string10,string11,string12,string13,string14ut
bit_vector) is

variable patternline: line;
variable column:integer;
begin
readline(patternfile, patternline);
column:=1;

readbit(patternline, column, string1);
readbit(patternline, column, string2);
readbit(patternline, column, string3);
readbit(patternline, column, string4);
readbit(patternline, column, string5);
readbit(patternline, column, string6);
readbitstring(patternline, column, string7);
readbitstring(patternline, column, string8);
readbitstring(patternline, column, string9);
readbitstring(patternline, column, string10);
readbitstring(patternline, column, string11);
readbitstring(patternline, column, string12);
readbitstring(patternline, column, string13);
readbitstring(patternline, column, string14);

end procedure;


thank you