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