[fpc-pascal] System.Write broken?

Micha Nelissen micha at neli.hopto.org
Wed Jul 13 23:07:01 CEST 2005


On Wed, 13 Jul 2005 16:02:21 -0500
Elio Cuevas Gómez <elio at mixtk.com> wrote:

> Hi, the folowing code enters infinite loop in the newest version of 
> FreePascal:
> 
> program textfile;
> 
> var
>   Archivo: Text;
>   Linea: AnsiString;
> 
> begin
>   Assign(Archivo, 'test.pp');
>   Reset(Archivo);
>   While not Eof(Archivo) do
>   begin
>     Read(Archivo, Linea);

Don't you want 'ReadLn' ?

What does Read do anyway, on PChars, strings and arrays ?

Micha




More information about the fpc-pascal mailing list