[fpc-pascal] Dear FreePascal

[Bart]

Hi Jurgen,

>  Although I don't see the purpose of the above code snippet there is a
> difference between existing and non-existing file:
>  If dat exists (and can be opened without error) then the rewrite is not
> done. So in this case dat is only opened for reading and existing data is
> not deleted (yet).

That is correct, of course.
But, take a look at his code, after reset (open read/write) he starts
writing 112 records to the file.
For the purpose of his program, the reset() is superfluous.

Bart