pascalabcnet/TestSuite/enum5.pas

10 lines
182 B
ObjectPascal
Raw Normal View History

2020-05-25 22:47:44 +03:00
uses System;
type
Enum = (A, B);
begin
var arr := new ValueTuple<Enum, Enum>[](new ValueTuple<Enum, Enum>(A,B));
assert(arr[0].Item1 = A);
assert(arr[0].Item2 = B);
end.