paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-18 17:19:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed alignment of widestring on win64 after llvm branch merge (should use

Browse Source 
packrecords 4) (mantis #27806)

git-svn-id: trunk@30501 -
This commit is contained in:
Jonas Maebe 2015-04-08 19:08:43 +00:00
parent 6391794958
commit a8db5e3dfb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/aasmcnst.pas
View File

@ -1174,7 +1174,7 @@ implementation
begin
result.lab:=startlab;
datatcb.begin_anonymous_record('$'+get_dynstring_rec_name(st_widestring,true,strlength),
0,
4,
targetinfos[target_info.system]^.alignment.recordalignmin,
targetinfos[target_info.system]^.alignment.maxCrecordalign);
datatcb.emit_tai(Tai_const.Create_32bit(strlength*cwidechartype.size),s32inttype);