Переглянути джерело

* changed the ifndef avr to ifdef avr in GetNextReg

git-svn-id: branches/z80@44522 -
nickysn 5 роки тому
батько
коміт
4b281dd6c9
1 змінених файлів з 5 додано та 5 видалено
  1. 5 5
      compiler/cgobj.pas

+ 5 - 5
compiler/cgobj.pas

@@ -742,15 +742,15 @@ implementation
 {$if defined(cpu8bitalu) or defined(cpu16bitalu)}
     function tcg.GetNextReg(const r: TRegister): TRegister;
       begin
-{$ifndef AVR}
+{$ifdef 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);
+{$else AVR}
         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}
         if getregtype(r)<>R_INTREGISTER then
           internalerror(2017091101);