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

* When optimization is off always load unused parentfp to a local location to be debugger friendly.

Browse Source 
git-svn-id: trunk@46514 -
This commit is contained in:
yury 2020-08-20 16:59:10 +00:00
parent ccc26ad34c
commit 75e5afd45b
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/ncgutil.pas
View File

@ -865,7 +865,8 @@ implementation
end
{ Unused parameters need to be kept in the original location
to prevent allocation of registers/resources for them. }
else if not tparavarsym(vs).is_used then
else if not tparavarsym(vs).is_used and
(cs_opt_unused_para in current_settings.optimizerswitches) then
begin
tparavarsym(vs).paraloc[calleeside].get_location(vs.initialloc);
end