9 lines
115 B
ObjectPascal
9 lines
115 B
ObjectPascal
|
begin
|
|||
|
|
var l: ^integer;
|
|||
|
|
l := nil;
|
|||
|
|
match l with
|
|||
|
|
nil: assert(true);
|
|||
|
|
else
|
|||
|
|
assert(false);
|
|||
|
|
end;
|
|||
|
|
end.
|