|
@@ -743,12 +743,12 @@ implementation
|
|
|
function tcg.GetNextReg(const r: TRegister): TRegister;
|
|
|
begin
|
|
|
{$ifndef AVR}
|
|
|
- { the AVR code generator depends on the fact that it can do GetNextReg also on physical registers }
|
|
|
if getsupreg(r)<first_int_imreg then
|
|
|
internalerror(2013051401);
|
|
|
if not has_next_reg[getsupreg(r)] then
|
|
|
internalerror(2017091103);
|
|
|
{$else AVR}
|
|
|
+ { the AVR code generator depends on the fact that it can do GetNextReg also on physical registers }
|
|
|
if (getsupreg(r)>=first_int_imreg) and not(has_next_reg[getsupreg(r)]) then
|
|
|
internalerror(2017091103);
|
|
|
{$endif AVR}
|