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

* Outgoing parameters on stack do not need to inhibit stack frame optimization on targets with fixed stack, because there they do not modify stack pointer in the middle of routine.

Browse Source 
git-svn-id: trunk@25488 -
This commit is contained in:
sergei 2013-09-15 12:19:11 +00:00
parent 5c1fb7b009
commit 1bd43f0ea1
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/psub.pas
View File

@ -972,7 +972,7 @@ implementation
exception below)
- no exceptions are used
- no pushes are used/esp modifications, could be:
* outgoing parameters on the stack
* outgoing parameters on the stack on non-fixed stack target
* incoming parameters on the stack
* open arrays
- no inline assembler
@ -997,8 +997,9 @@ implementation
not(cs_generate_stackframes in current_settings.localswitches) and
not(cs_profile in current_settings.moduleswitches) and
not(po_assembler in procdef.procoptions) and
not ((pi_has_stackparameter in flags) and (not paramanager.use_fixed_stack)) and
((flags*([pi_has_assembler_block,pi_is_assembler,
pi_has_stackparameter,pi_needs_stackframe]+
pi_needs_stackframe]+
exception_flags[(target_info.cpu=cpu_i386)
{$ifndef DISABLE_WIN64_SEH}
or (target_info.system=system_x86_64_win64)