freepascal.compiler/bugs/bug0120.pp

type
   te = (enum);

var
   e : te;

begin
   inc(e);
end.