tb0023.pp 166 B

12345678
  1. { Old file: tbs0027.pp }
  2. { tests type enumtype = (One, two, three, forty:=40, fifty); OK 0.9.5 }
  3. type enumtype = (One, two, three, forty:=40, fifty);
  4. begin
  5. end.