Source position: avl_tree.pp line 107
protected procedure TAVLTree.SetOnCompare(
const AValue: TListSortCompare
);