paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-24 09:39:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

* x86_64-win64: don't allocate outgoing parameter area in nostackframe procedures, it fails compilation if range/overflow/etc checking is enabled (which always sets pi_do_call) due to check introduced in r22677.

Browse Source 
git-svn-id: trunk@25176 -
This commit is contained in:
sergei 2013-07-26 10:24:31 +00:00
parent 53ea24a0b1
commit 70dda94474
1 changed files with 2 additions and 1 deletions

3
compiler/x86_64/cpupi.pas
View File

@ -69,7 +69,8 @@ implementation
begin
{ Fixes the case when there are calls done by low-level means
(cg.a_call_name) but no child callnode }
if (pi_do_call in flags) then
if (pi_do_call in flags) and
not (po_nostackframe in procdef.procoptions) then
allocate_push_parasize(32);
if not(po_assembler in procdef.procoptions) and