mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-09 21:48:35 +02:00
* removed superfluous checks (push_addr_param() already checks for those)
git-svn-id: trunk@24759 -
This commit is contained in:
parent
4e210e57c2
commit
dd15ee5bf2
@ -356,9 +356,7 @@ unit cpupara;
|
||||
LOC_REFERENCE:
|
||||
begin
|
||||
paraloc^.size:=OS_ADDR;
|
||||
if push_addr_param(hp.varspez,paradef,p.proccalloption) or
|
||||
is_open_array(paradef) or
|
||||
is_array_of_const(paradef) then
|
||||
if push_addr_param(hp.varspez,paradef,p.proccalloption) then
|
||||
assignintreg
|
||||
else
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user