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