mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 13:59:29 +02:00
Rectify last commit: po_assembler alone still sets up a stack frame
git-svn-id: trunk@22722 -
This commit is contained in:
parent
a8591af2a9
commit
e01c7603b8
@ -67,8 +67,7 @@ implementation
|
||||
Alignment must be the max available, as doubles require
|
||||
8 byte alignment
|
||||
}
|
||||
if (po_assembler in procdef.procoptions) or
|
||||
(po_nostackframe in procdef.procoptions) then
|
||||
if (po_nostackframe in procdef.procoptions) then
|
||||
result:=Align(tg.direction*tg.lasttemp+maxpushedparasize,current_settings.alignment.localalignmax)
|
||||
else
|
||||
result:=Align(tg.direction*tg.lasttemp+maxpushedparasize+target_info.first_parm_offset,current_settings.alignment.localalignmax);
|
||||
|
Loading…
Reference in New Issue
Block a user