Source position: sortalgs.pp line 160
procedure IntroSort_ItemList_Context(
Items: Pointer;
ItemCount: SizeUInt;
ItemSize: SizeUInt;
Comparer: TListSortComparer_Context;
Context: Pointer
);