Source position: xmlschemas.inc line 89
type xmlSchemaValidityErrorFunc = procedure(
ctx: pointer;
msg: pchar
);