Source position: sortalgs.pp line 158
procedure IntroSort_PtrList_NoContext(
ItemPtrs: PPointer;
ItemCount: SizeUInt;
Comparer: TListSortComparer_NoContext
);