* fixed TFPList.Sort. Scary news: turns out we don't have any tests for

  TFPList.Sort or TList.Sort... :(

git-svn-id: trunk@41177 -

rtl/objpas/classes/lists.inc

@@ -302,7 +302,7 @@ end;
 
 procedure TFPList.Sort(Compare: TListSortCompare);
 begin
-  Sort(Compare, @SortBase.DefaultSortingAlgorithm);
+  Sort(Compare, SortBase.DefaultSortingAlgorithm);
 end;