5 lines
74 B
ObjectPascal
5 lines
74 B
ObjectPascal
|
function f(x: byte := default(byte)) := x;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
assert(f = 0);
|
|||
|
|
end.
|