Ver código fonte

Avoid adding size if tf_needs_symbol_size is not in target_info.flags

Pierre Muller 2 meses atrás
pai
commit
0610d691b6
1 arquivos alterados com 2 adições e 1 exclusões
  1. 2 1
      compiler/ncgcon.pas

+ 2 - 1
compiler/ncgcon.pas

@@ -178,7 +178,8 @@ implementation
                       internalerror(10120);
                       internalerror(10120);
 {$endif not cpufloat128}
 {$endif not cpufloat128}
                   end;
                   end;
-                  current_asmdata.asmlists[al_typedconsts].concat(Tai_symbol_end.Create(lastlabel));
+                  if (tf_needs_symbol_size in target_info.flags) then
+                    current_asmdata.asmlists[al_typedconsts].concat(Tai_symbol_end.Create(lastlabel));
                end;
                end;
           end;
           end;
         location.reference.symbol:=lab_real;
         location.reference.symbol:=lab_real;