This commit is contained in:
Бондарев Иван 2016-07-28 21:10:40 +02:00
parent ff5753c6ca
commit 8a12f4743d
2 changed files with 8 additions and 1 deletions

5
TestSuite/sort1.pas Normal file
View file

@ -0,0 +1,5 @@
begin
var a := Arr(1,3,2);
a.Sort((row1, row2) -> 1);
assert(a[0] = 1);
end.

View file

@ -854,7 +854,9 @@ namespace SymbolTable
(((to.symbol_kind==symbol_kind.sk_none)&&(add.symbol_kind==symbol_kind.sk_none))&&(to.scope==add.scope))
||
((to.symbol_kind==symbol_kind.sk_overload_function)&&(add.symbol_kind==symbol_kind.sk_overload_function))
);
||
((to.symbol_kind == symbol_kind.sk_overload_procedure) && (add.symbol_kind == symbol_kind.sk_overload_procedure))
);
}
private bool AlreadyAdded(SymbolInfo si, SymbolInfo FirstInfo)