paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-20 10:49:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* cleanup captured symbols when moving them from the nested function to the new method

Browse Source
This commit is contained in:
Sven/Sarah Barth 2022-09-23 14:44:42 +02:00
parent 960c154f48
commit 965bba5ab4
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/procdefutil.pas
View File

@ -1081,6 +1081,7 @@ implementation
begin begin
captured:=pcapturedsyminfo(capturesyms[i]); captured:=pcapturedsyminfo(capturesyms[i]);
pi.add_captured_sym(captured^.sym,captured^.fileinfo); pi.add_captured_sym(captured^.sym,captured^.fileinfo);
dispose(captured);
end; end;
capturesyms.clear; capturesyms.clear;
end; end;