Source position: Clipper.Core.pas line 331
procedure QuickSort(
SortList: TPointerList;
L: Integer;
R: Integer;
const SCompare: TListSortCompareFunc
);