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