7 lines
107 B
ObjectPascal
7 lines
107 B
ObjectPascal
uses u_samename;
|
|
|
|
function val_a := u_samename.val_a;
|
|
|
|
begin
|
|
assert(val_a() = System.IntPtr(0));
|
|
end. |