Този сайт работи по-добре с JavaScript.
Начало
Каталог
Помощ
Вход
freepascal
/
utils
Наблюдаван
1
Харесван
0
Разклонения
0
Код
Задачи
0
Заявки за сливане
0
Версии
0
Уики
Activity
Преглед на файлове
* [utlSetHelper] fixed bug in Compare method
master
Bergmann89
преди 11 години
родител
bc7faefe61
ревизия
dc966012a9
променени са
1 файла
, в които са
добавени 1
реда и са
изтрити 1
реда
Разделен изглед
Diff Options
Показване на статистика
Download Patch File
Download Diff File
+1
-1
uutlSetHelper.inc
+ 1
- 1
uutlSetHelper.inc
Целия файл
@@ -74,7 +74,7 @@ begin
if (i in aSet1) and not (i in aSet2) then begin
result := 1;
break;
end else if not (i in aSet
2
) and (i in aSet2) then begin
end else if not (i in aSet
1
) and (i in aSet2) then begin
result := -1;
break;
end;
Пиши
Преглед
Зареждане…
Отказ
Запис