pascalabcnet/TestSuite/RangeT first.pas

##
Assert(InternalRange(2,5).First = 2);
Assert(InternalRange('b','e').First = 'b');