fpc/tests/tbs0120.pp
1998-12-02 13:05:01 +00:00

10 lines
60 B
ObjectPascal

type
te = (enum);
var
e : te;
begin
inc(e);
end.