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

Avoid adding size if tf_needs_symbol_size is not in target_info.flags

Pierre Muller пре 2 месеци
родитељ
комит
0610d691b6
1 измењених фајлова са 2 додато и 1 уклоњено
  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;