9 lines
234 B
ObjectPascal
9 lines
234 B
ObjectPascal
type
|
|
TClass = class
|
|
end;
|
|
|
|
begin
|
|
var x{@var x: (integer,List<byte>);@} := (0, new List<byte>());
|
|
var y{@var y: (integer,TClass);@} := (0, new TClass());
|
|
writeln(y.Item2{@property Tuple<>.Item2: TClass; readonly;@});
|
|
end. |