Bläddra i källkod

* MIPS: Fixed code generation for PIC calls to local functions. Uncovered by r32803, before that the buggy branch was never taken because all functions were global.

git-svn-id: trunk@32844 -
sergei 9 år sedan
förälder
incheckning
5456960d54
1 ändrade filer med 1 tillägg och 0 borttagningar
  1. 1 0
      compiler/mips/cgcpu.pas

+ 1 - 0
compiler/mips/cgcpu.pas

@@ -362,6 +362,7 @@ begin
   if (sym.bind=AB_LOCAL) then
     begin
       href.refaddr:=addr_low;
+      href.base:=NR_NO;
       list.concat(taicpu.op_reg_ref(A_ADDIU,NR_PIC_FUNC,href));
     end;
   list.concat(taicpu.op_reg(A_JALR,NR_PIC_FUNC));