2 lines
51 B
Ada
2 lines
51 B
Ada
|
subtype Positive is Integer range 1..Integer'Last;
|