Browse Source

Manually increase refs of newly created labelsymbol in insertpcrelativedata

Pierre Muller 3 years ago
parent
commit
2cdbdcd5c5
1 changed files with 1 additions and 0 deletions
  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;