Преглед изворни кода

* MIPS: an empty reference (no symbol, base or index and zero offset) must not be output as empty string.

git-svn-id: trunk@24630 -
sergei пре 12 година
родитељ
комит
e1f6cf79e9
1 измењених фајлова са 4 додато и 1 уклоњено
  1. 4 1
      compiler/mips/cpugas.pas

+ 4 - 1
compiler/mips/cpugas.pas

@@ -121,7 +121,10 @@ unit cpugas;
             if assigned(ref.symbol) then
             if assigned(ref.symbol) then
               result:=result+'+';
               result:=result+'+';
             result:=result+tostr(ref.offset);
             result:=result+tostr(ref.offset);
-          end;
+          end
+        { asmreader appears to treat literal numbers as references }
+        else if (ref.symbol=nil) and (ref.base=NR_NO) and (ref.index=NR_NO) then
+          result:='0';
 
 
         { either base or index may be present, but not both }
         { either base or index may be present, but not both }
         reg:=ref.base;
         reg:=ref.base;