Source position: pscanner.pp line 645
type TCELogEvent = procedure(
Sender: TCondDirectiveEvaluator;
Args: array of Const
) of object;