Browse Source

Clean up dead code.

m68k/n68kcnv.pas:
  - pass_generate_code is used from the parent class
  - ungetcpuregister is not needed here

git-svn-id: trunk@26848 -
svenbarth 11 years ago
parent
commit
2a65c05a8c
1 changed files with 0 additions and 25 deletions
  1. 0 25
      compiler/m68k/n68kcnv.pas

+ 0 - 25
compiler/m68k/n68kcnv.pas

@@ -34,7 +34,6 @@ interface
           function first_int_to_real: tnode; override;
           procedure second_int_to_real;override;
           procedure second_int_to_bool;override;
-//          procedure pass_generate_code;override;
        end;
 
 implementation
@@ -231,9 +230,7 @@ implementation
                          cg.a_load_ref_reg(current_asmdata.CurrAsmList,opsize,opsize,
                             left.location.reference,hreg2);
                          current_asmdata.CurrAsmList.concat(taicpu.op_reg(A_TST,TCGSize2OpSize[opsize],hreg2));
-    //                     cg.ungetcpuregister(current_asmdata.CurrAsmList,hreg2);
                       end;
-    //                reference_release(current_asmdata.CurrAsmList,left.location.reference);
                   end;
               end;
             LOC_REGISTER,LOC_CREGISTER :
@@ -249,7 +246,6 @@ implementation
                   begin
                     hreg2:=left.location.register;
                     current_asmdata.CurrAsmList.concat(taicpu.op_reg(A_TST,TCGSize2OpSize[opsize],hreg2));
-    //                cg.ungetcpuregister(current_asmdata.CurrAsmList,hreg2);
                   end;
               end;
             LOC_FLAGS :
@@ -305,27 +301,6 @@ implementation
          current_procinfo.CurrFalseLabel:=oldFalseLabel;
       end;
 
-{
-    procedure tm68ktypeconvnode.pass_generate_code;
-{$ifdef TESTOBJEXT2}
-      var
-         r : preference;
-         nillabel : plabel;
-{$endif TESTOBJEXT2}
-      begin
-         { this isn't good coding, I think tc_bool_2_int, shouldn't be }
-         { type conversion (FK)                                 }
-
-         if not(convtype in [tc_bool_2_int,tc_bool_2_bool]) then
-           begin
-              secondpass(left);
-              location_copy(location,left.location);
-              if codegenerror then
-               exit;
-           end;
-         second_call_helper(convtype);
-      end;
-}
 
 begin
    ctypeconvnode:=tm68ktypeconvnode;