mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 13:59:29 +02:00
* us cs_opt_stackframe
git-svn-id: trunk@3326 -
This commit is contained in:
parent
79e483ec65
commit
70e7546d87
@ -748,7 +748,7 @@ implementation
|
||||
* open arrays
|
||||
- no inline assembler
|
||||
}
|
||||
if (cs_opt_level1 in aktoptimizerswitches) and
|
||||
if (cs_opt_stackframe in aktoptimizerswitches) and
|
||||
not(po_assembler in procdef.procoptions) and
|
||||
((flags*[pi_has_assembler_block,pi_uses_exceptions,pi_is_assembler,
|
||||
pi_needs_implicit_finally,pi_has_implicit_finally,pi_has_stackparameter])=[]) then
|
||||
|
Loading…
Reference in New Issue
Block a user