10 lines
126 B
ObjectPascal
10 lines
126 B
ObjectPascal
procedure p1<T>(x: T);
|
|
begin
|
|
var o := x;
|
|
var ot := o?.GetType;
|
|
assert(ot = typeof(integer));
|
|
end;
|
|
|
|
begin
|
|
p1(2);
|
|
end. |