소스 검색

* make use of RemoveCurrentP

git-svn-id: trunk@43532 -
florian 5 년 전
부모
커밋
f5caa9940b
1개의 변경된 파일2개의 추가작업 그리고 4개의 파일을 삭제
  1. 2 4
      compiler/x86/aoptx86.pas

+ 2 - 4
compiler/x86/aoptx86.pas

@@ -2052,12 +2052,10 @@ unit aoptx86;
                       ->
                         decw    %si             addw    %dx,%si       p
                     }
-                    asml.remove(p);
                     asml.remove(hp2);
-                    p.Free;
                     hp2.Free;
-                    p := hp1;
-                    Result := True;
+                    RemoveCurrentP(p);
+                    Result:=True;
                     Exit;
                   end;
               end;