I didn't test more tho so perhaps there are more problems..
Ales
90,95c90,94
< if L.Count>0 then
< For I:=0 to (L.Count-1) div 2 do
< begin
< S:=L[i*2];
< Writeln(Format('%s %s',[S+Space(30-Length(S)),L[(i*2)+1]]));
< end;
---
> For I:=0 to (L.Count-1) div 2 do
> begin
> S:=L[i*2];
> Writeln(Format('%s %s',[S+Space(30-Length(S)),L[(i*2)+1]]));
> end;
_______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
