// TODO: for FreePascal, use {$PUSH} in IdRangeCheckingOff.inc and {$POP} here {$IFDEF _RPlusWasEnabled} {$R+} {$UNDEF _RPlusWasEnabled} {$ENDIF}