paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-05 13:38:44 +02:00
Code Issues Packages Projects Releases Wiki Activity

* replaced use of current_asmdata.currasmlist with the "list" parameter

Browse Source 
in g_set_addr_nonbitpacked_record_field_ref()

git-svn-id: trunk@31776 -
This commit is contained in:
Jonas Maebe 2015-09-22 19:59:34 +00:00
parent 530a08b779
commit 954cfd8d40
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/llvm/hlcgllvm.pas
View File

@ -1232,7 +1232,7 @@ implementation
subscriptdef:=cpointerdef.getreusable(recdef);
{ load the address of that shadow field }
newbase:=hlcg.getaddressregister(list,cpointerdef.getreusable(llvmfielddef));
recref:=thlcgllvm(hlcg).make_simple_ref(current_asmdata.CurrAsmList,recref,recdef);
recref:=thlcgllvm(hlcg).make_simple_ref(list,recref,recdef);
list.concat(taillvm.getelementptr_reg_size_ref_size_const(newbase,subscriptdef,recref,s32inttype,field.llvmfieldnr,true));
reference_reset_base(recref,cpointerdef.getreusable(field.vardef),newbase,field.offsetfromllvmfield,newalignment(recref.alignment,field.fieldoffset+field.offsetfromllvmfield));
end;