Procházet zdrojové kódy

* MIPS: 3-operand forms of DIV and DIVU are not macros if first operand is $zero.

git-svn-id: trunk@24918 -
sergei před 12 roky
rodič
revize
456f991c51
1 změnil soubory, kde provedl 3 přidání a 1 odebrání
  1. 3 1
      compiler/mips/cpugas.pas

+ 3 - 1
compiler/mips/cpugas.pas

@@ -241,7 +241,9 @@ unit cpugas;
           or (op=A_LA) or ((op=A_BC) and
             not (ai.condition in [C_EQ,C_NE,C_GTZ,C_GEZ,C_LTZ,C_LEZ,C_COP1TRUE,C_COP1FALSE])) {or (op=A_JAL)}
           or (op=A_REM) or (op=A_REMU)
-          or (op=A_DIV) or (op=A_DIVU)
+          { DIV and DIVU are normally macros, but use $zero as first arg to generate a CPU instruction. }
+          or ((op=A_DIV) or (op=A_DIVU) and
+            ((ai.ops<>3) or (ai.oper[0]^.typ<>top_reg) or (ai.oper[0]^.reg<>NR_R0)))
           or (op=A_MULO) or (op=A_MULOU)
           { A_LI is only a macro if the immediate is not in thez 16-bit range }
           or (op=A_LI);