mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 10:19:30 +02:00
* fixed set_first_temp_offset for use_fixed_stack
git-svn-id: trunk@2866 -
This commit is contained in:
parent
8ef01e93c1
commit
3765a9bbb8
@ -60,7 +60,8 @@ unit cpupi;
|
||||
begin
|
||||
if use_fixed_stack then
|
||||
begin
|
||||
if not(po_assembler in procdef.procoptions) then
|
||||
if not(po_assembler in procdef.procoptions) and
|
||||
(tg.direction > 0) then
|
||||
tg.setfirsttemp(tg.direction*maxpushedparasize);
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user