(*
 Error 70                 Set Base Type Out of Range                  pp 323

 Source:  Compiler

 Cause:   Valid range of Set base type is 0..255.

 Remedy:  Examine the statement ahead of the error cursor for the above
          condition.


 ----------------------------------------------------------------------------


 Example:
       CONST                       { Wrong - valid base type is Byte }
          SetCon : Set of Integer = [0..9];


       TYPE
          SetTyp = Set Of 0..312;  { Wrong - valid range is 0..255   }

       BEGIN
       END.