Source position: avl_tree.pp line 100
protected procedure TAVLTree.SetOnObjectCompare(
const AValue: TObjectSortCompare
);