瀏覽代碼

- removed unused variables

git-svn-id: trunk@28282 -
sergei 11 年之前
父節點
當前提交
01c8ee158d
共有 1 個文件被更改,包括 3 次插入6 次删除
  1. 3 6
      compiler/m68k/n68kmat.pas

+ 3 - 6
compiler/m68k/n68kmat.pas

@@ -70,8 +70,7 @@ implementation
     procedure tm68knotnode.second_boolean;
     procedure tm68knotnode.second_boolean;
       var
       var
         hreg: tregister;
         hreg: tregister;
-         opsize : tcgsize;
-         loc : tcgloc;
+        opsize : tcgsize;
       begin
       begin
         if not handle_locjump then
         if not handle_locjump then
           begin
           begin
@@ -154,10 +153,8 @@ implementation
 
 
 
 
   procedure tm68kmoddivnode.emit_mod_reg_reg(signed: boolean;denum,num : tregister);
   procedure tm68kmoddivnode.emit_mod_reg_reg(signed: boolean;denum,num : tregister);
-      var tmpreg : tregister;
-          continuelabel : tasmlabel;
-          signlabel : tasmlabel;
-          reg_d0,reg_d1 : tregister;
+    var
+      tmpreg : tregister;
     begin
     begin
      if current_settings.cputype=cpu_MC68020 then
      if current_settings.cputype=cpu_MC68020 then
        begin
        begin