pascalabcnet/TestSuite/label_ass_var_tuple.pas

8 lines
88 B
ObjectPascal
Raw Normal View History

2020-12-09 19:09:36 +03:00
label 1;
begin
var c := 1;
1:
var (a,b) := (1,1);
b := 1;
Assert(b=1);
end.