paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-15 09:39:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed memory leak in case one tai operand is replaced by another

Browse Source 
git-svn-id: trunk@30424 -
This commit is contained in:
Jonas Maebe 2015-04-04 14:29:00 +00:00
parent 3279cc052a
commit ee7198aa57
1 changed files with 1 additions and 2 deletions

3
compiler/llvm/aasmllvm.pas
View File

@ -299,8 +299,7 @@ uses
allocate_oper(opidx+1);
with oper[opidx]^ do
begin
if typ<>top_tai then
clearop(opidx);
clearop(opidx);
ai:=_ai;
typ:=top_tai;
end;