Просмотр исходного кода

Manually increase refs of newly created labelsymbol in insertpcrelativedata

Pierre Muller 3 лет назад
Родитель
Сommit
2cdbdcd5c5
1 измененных файлов с 1 добавлено и 0 удалено
  1. 1 0
      compiler/arm/aasmcpu.pas

+ 1 - 0
compiler/arm/aasmcpu.pas

@@ -1131,6 +1131,7 @@ implementation
                                   listtoinsert.Concat(hp2);
                                   taicpu(curtai).oper[curop]^.ref^.symboldata:=hp;
                                   taicpu(curtai).oper[curop]^.ref^.symbol:=l;
+                                  l.increfs;
                                   curdatatai:=hp;
                                 end;