Adriaan van Os wrote:
{$define Close(f, x) Close (f)}
The program wouldn't behave as expected, because the second parameter isn't meaningless, e.g. x=CRUNCH sets the end-of-file to the point of last access. So, I guess, it is better to change UCSD Pascal source code when porting to GPC (or to another Pascal).
Does it allow seeking while writing? Or "crunching" a read-only file? Otherwise the point of last access would be the end of a (sequential) writing sequence.
But anyway, my suggestion wasn't meant too seriously.
Frank