tests/webtbf/tw35753.pp


1
2
3
4
5
6
7
8
9
10
11
12

{ %fail }
{ %OPT=-vw -Sew }

type
      TRegister = (
        TRegisterLowEnum := Low(longint),
        TRegisterHighEnum := High(longint)
      );
const
       NR_INVALID    = tregister($fffffffff);
begin
end.