mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 00:39:34 +02:00
* fixed paraloc def when changing the size to OS_32
git-svn-id: trunk@40566 -
This commit is contained in:
parent
97bc58d248
commit
6e453a1477
@ -556,7 +556,10 @@ unit cpupara;
|
||||
(side=callerside) and
|
||||
is_ordinal(paradef) and
|
||||
(paradef.size<4) then
|
||||
paraloc^.size:=OS_32;
|
||||
begin
|
||||
paraloc^.size:=OS_32;
|
||||
paraloc^.def:=u32inttype;
|
||||
end;
|
||||
|
||||
{ in case it's a composite, "The argument is passed as though
|
||||
it had been loaded into the registers from a double-word-
|
||||
|
Loading…
Reference in New Issue
Block a user