1 2 3 4 5 6 7 8 9 10 11 12
{ %fail } uses uenum2a; var e: tenum; begin e := tone; inc(e); writeln(byte(e)); end.