Source position: errorh.inc line 2
procedure error(
status: LongInt;
errnum: LongInt;
format: PAnsiChar;
args: array of Const
);