Browse Source

* remove accidently committed debug statement

florian 6 months ago
parent
commit
5bb4049737
3 changed files with 1 additions and 3 deletions
  1. 0 1
      compiler/riscv/aoptcpurv.pas
  2. 1 0
      compiler/riscv/cpubase.pas
  3. 0 2
      compiler/riscv64/cgcpu.pas

+ 0 - 1
compiler/riscv/aoptcpurv.pas

@@ -37,7 +37,6 @@ uses
   aasmtai, aasmcpu;
   aasmtai, aasmcpu;
 
 
 type
 type
-
   TRVCpuAsmOptimizer = class(TAsmOptimizer)
   TRVCpuAsmOptimizer = class(TAsmOptimizer)
     function InstructionLoadsFromReg(const reg: TRegister; const hp: tai): boolean; override;
     function InstructionLoadsFromReg(const reg: TRegister; const hp: tai): boolean; override;
     function RegLoadedWithNewValue(reg: tregister; hp: tai): boolean; override;
     function RegLoadedWithNewValue(reg: tregister; hp: tai): boolean; override;

+ 1 - 0
compiler/riscv/cpubase.pas

@@ -43,6 +43,7 @@ uses
         A_FMV_S,A_FABS_S,A_FNEG_S,A_FMV_D,A_FABS_D,A_FNEG_D,A_FNEG_Q,
         A_FMV_S,A_FABS_S,A_FNEG_S,A_FMV_D,A_FABS_D,A_FNEG_D,A_FNEG_Q,
         A_BEQZ,A_BNEZ,A_BLEZ,A_BGEZ,A_BLTZ,A_BGTZ,A_BGT,A_BLE,
         A_BEQZ,A_BNEZ,A_BLEZ,A_BGEZ,A_BLTZ,A_BGTZ,A_BGT,A_BLE,
         A_BGTU,A_BLEU,A_J,A_JR,A_RET,A_TAIL,
         A_BGTU,A_BLEU,A_J,A_JR,A_RET,A_TAIL,
+
         { normal opcodes }
         { normal opcodes }
         A_LUI,A_AUIPC,A_JAL,A_JALR,
         A_LUI,A_AUIPC,A_JAL,A_JALR,
         A_Bxx,A_LB,A_LH,A_LW,A_LBU,A_LHU,
         A_Bxx,A_LB,A_LH,A_LW,A_LBU,A_LHU,

+ 0 - 2
compiler/riscv64/cgcpu.pas

@@ -122,8 +122,6 @@ implementation
           ((tcgsize2unsigned[fromsize]<>fromsize) and ((tcgsize2unsigned[tosize]=tosize)) and
           ((tcgsize2unsigned[fromsize]<>fromsize) and ((tcgsize2unsigned[tosize]=tosize)) and
             (tcgsize2size[fromsize] < tcgsize2size[tosize]) and (tcgsize2size[tosize] <> sizeof(pint)) ) then
             (tcgsize2size[fromsize] < tcgsize2size[tosize]) and (tcgsize2size[tosize] <> sizeof(pint)) ) then
           begin
           begin
-            if 8*(8-tcgsize2size[tosize])=64 then
-              writeln;
             if tcgsize2size[fromsize]<tcgsize2size[tosize] then
             if tcgsize2size[fromsize]<tcgsize2size[tosize] then
               begin
               begin
                 list.Concat(taicpu.op_reg_reg_const(A_SLLI,reg2,reg1,8*(8-tcgsize2size[fromsize])));
                 list.Concat(taicpu.op_reg_reg_const(A_SLLI,reg2,reg1,8*(8-tcgsize2size[fromsize])));