Source position: compproc.inc line 322
procedure fpc_rewrite_typed(
var f: TypedFile;
Size: LongInt
);