i := 1;
f_loop : while not endfile(f) loop
- realresult := (71 => nul, others => ' ');
+ realresult := (72 => nul, others => ' ');
f1_loop : while not endfile(f) loop
readline (f, l);
-- ergebnis string richtig formatieren
hstrtmp := expectedresult;
- expectedresult := (71 => nul, others => ' ');
- for x in 1 to 70 loop
+ expectedresult := (72 => nul, others => ' ');
+ for x in 1 to 71 loop
if hstrtmp(x) /= nul then
- expectedresult((70-y) + x) := hstrtmp(x);
+ expectedresult((71-y) + x) := hstrtmp(x);
end if;
end loop;
icwait(sys_clk, 5);
do_it <= '1';
run_tc := true;
- j := 1; k := 70;
+ j := 1; k := 71;
while run_tc loop
wait on p_rget, p_wtake, p_finished, finished;