mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 22:29:24 +02:00
* update alignment when advancing offset to next element of array constructor node
git-svn-id: trunk@34279 -
This commit is contained in:
parent
7678f5ecf0
commit
4e8bda76cb
@ -1165,6 +1165,7 @@ implementation
|
||||
|
||||
procedure tcgarrayconstructornode.advancearrayoffset(var ref: treference; elesize: asizeint);
|
||||
begin
|
||||
ref.alignment:=newalignment(ref.alignment,elesize);
|
||||
inc(ref.offset,elesize);
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user