pascalabcnet/TestSuite/typedRange.pas
Mikhalkovich Stanislav cf55d3ffd7 fix #2333
2021-01-18 18:43:39 +03:00

4 lines
77 B
ObjectPascal

begin
var b: IntRange := 1..5;
Assert((b.Low=1) and (b.High=5));
end.