Source position: dateutil.inc line 375
function CompareDate(
const A: TDateTime;
const B: TDateTime
):TValueRelationship;