pascalabcnet/TestSuite/match_const1.pas
2019-05-25 21:53:02 +03:00

8 lines
83 B
ObjectPascal

const c = 2;
begin
var l := 2;
match l with
c: Assert(c=2);
end;
end.