pascalabcnet/TestSuite/intellisense_tests/generics3.pas

5 lines
156 B
ObjectPascal
Raw Permalink Normal View History

2018-03-07 23:12:31 +03:00
function f1<T1, T2, T3>(a: (T1, T2, T3)): (T1, T2, T3);begin end;
begin
var a{@var a: (byte,word,single);@} := f1((byte(0), word(0), single(0)));
end.