浏览代码

* tMIPSELnotnode.second_boolean: reuse common handle_locjump method.

git-svn-id: trunk@26735 -
sergei 11 年之前
父节点
当前提交
d29300df13
共有 1 个文件被更改,包括 1 次插入17 次删除
  1. 1 17
      compiler/mips/ncpumat.pas

+ 1 - 17
compiler/mips/ncpumat.pas

@@ -233,25 +233,9 @@ end;
 
 
 procedure tMIPSELnotnode.second_boolean;
 procedure tMIPSELnotnode.second_boolean;
 var
 var
-  hl: tasmlabel;
   tmpreg : TRegister;
   tmpreg : TRegister;
 begin
 begin
-  { if the location is LOC_JUMP, we do the secondpass after the
-          labels are allocated
-        }
-  if left.expectloc = LOC_JUMP then
-  begin
-    hl := current_procinfo.CurrTrueLabel;
-    current_procinfo.CurrTrueLabel := current_procinfo.CurrFalseLabel;
-    current_procinfo.CurrFalseLabel := hl;
-    secondpass(left);
-    maketojumpbool(current_asmdata.CurrAsmList, left, lr_load_regvars);
-    hl := current_procinfo.CurrTrueLabel;
-    current_procinfo.CurrTrueLabel := current_procinfo.CurrFalseLabel;
-    current_procinfo.CurrFalseLabel := hl;
-    location.loc := LOC_JUMP;
-  end
-  else
+  if not handle_locjump then
   begin
   begin
     secondpass(left);
     secondpass(left);
     case left.location.loc of
     case left.location.loc of