diff options
author | svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2015-11-23 12:53:07 +0000 |
---|---|---|
committer | svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2015-11-23 12:53:07 +0000 |
commit | 5985df8bedffaaf96dec2b23a8ec7b9b0f1297e2 (patch) | |
tree | e90cf1c359943a9874fac2b9ad046edeadcc4269 | |
parent | acbf6051e4494a4e069d100f0b437b7e1fc942e7 (diff) | |
download | fpc-5985df8bedffaaf96dec2b23a8ec7b9b0f1297e2.tar.gz |
ncgflw.pas, tcgonnode:
* pass_generate_node: get rid of unnecessary move into register
git-svn-id: http://svn.freepascal.org/svn/fpc/branches/svenbarth@32503 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r-- | packages/compiler/ncgflw.pas | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/packages/compiler/ncgflw.pas b/packages/compiler/ncgflw.pas index 19f483a19a..473148b42a 100644 --- a/packages/compiler/ncgflw.pas +++ b/packages/compiler/ncgflw.pas @@ -1284,9 +1284,7 @@ implementation if tf_supports_packages in target_info.flags then begin reference_reset_symbol(href2,current_asmdata.RefAsmSymbol(excepttype.vmt_mangledname(true),AT_DATA),0,sizeof(pint)); - hreg:=hlcg.getaddressregister(current_asmdata.CurrAsmList,pvmttype); - hlcg.a_load_ref_reg(current_asmdata.CurrAsmList,getpointerdef(pvmttype),pvmttype,href2,hreg); - hlcg.a_load_reg_cgpara(current_asmdata.CurrAsmList,pvmttype,hreg,paraloc1); + hlcg.a_load_ref_cgpara(current_asmdata.CurrAsmList,pvmttype,href2,paraloc1); end else begin |