fpc/tests/tbs/tb0502.pp
Jonas Maebe a12f293781 * fixed wrong note about explictly valued enumeration types if the lower
bound is <= -1

git-svn-id: trunk@4182 -
2006-07-14 17:16:27 +00:00

11 lines
156 B
ObjectPascal

{ %norun }
{ %opt=-Sen }
type
TRegister = (
TRegisterLowEnum := Low(longint),
TRegisterHighEnum := High(longint)
);
begin
end.