Source position: fpjson.schema.pascaltypes.pp line 35
type TSchemaCodeGenLogEvent = procedure(
aType: TEventType;
const Msg: string
) of object;