Преглед изворни кода

* also check if ECX is nonvolatile in is_ecx_used. Not strictly necessary for the current set of i386 calling conventions, but good as an extra safety precaution in case new calling conventions are added or the code is adapted and used on other platforms.

git-svn-id: trunk@25839 -
nickysn пре 12 година
родитељ
комит
a0723ccfd5
1 измењених фајлова са 3 додато и 1 уклоњено
  1. 3 1
      compiler/i386/cgcpu.pas

+ 3 - 1
compiler/i386/cgcpu.pas

@@ -642,13 +642,15 @@ unit cgcpu;
 
       }
 
-      { returns whether ECX is used as a parameter }
+      { returns whether ECX is used (either as a parameter or is nonvolatile and shouldn't be changed) }
       function is_ecx_used: boolean;
         var
           i: Integer;
           hp: tparavarsym;
           paraloc: PCGParaLocation;
         begin
+          if not (RS_ECX in paramanager.get_volatile_registers_int(procdef.proccalloption)) then
+            exit(true);
           for i:=0 to procdef.paras.count-1 do
            begin
              hp:=tparavarsym(procdef.paras[i]);