7 lines
91 B
ObjectPascal
7 lines
91 B
ObjectPascal
|
// #1416
|
|||
|
|
function f1 := 5;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
var o := new class(a := f1);
|
|||
|
|
Assert(o.a = 5);
|
|||
|
|
end.
|