pascalabcnet/TestSuite/generics13.pas
Бондарев Иван 0de42e3930 bug fix #608
2017-12-10 11:23:02 +01:00

6 lines
137 B
ObjectPascal

begin
var a := Arr(0).Cast&<integer>.ToArray;
assert(a[0] = 0);
a := Arr(0).Cast&<integer>().ToArray();
assert(a[0] = 0);
end.