diff options
author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2012-05-20 21:11:45 +0000 |
---|---|---|
committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2012-05-20 21:11:45 +0000 |
commit | 1adfb0ff825bae64b7930b14ccdde8c42910534e (patch) | |
tree | f5c5f8804942e3ae019efea73cd1a19054aeafb5 /compiler/ncgcal.pas | |
parent | 0b05cc3d0ffaa974fdcae3f0cf36ce1c5a39e550 (diff) | |
download | fpc-1adfb0ff825bae64b7930b14ccdde8c42910534e.tar.gz |
* fixed (currently harmless) error in r21287 that specified that the full
contents of a procvar had to be loaded in case of a procedure of object
or nested procvar rather than only the code address (harmless, because
this code is only active for low level targets currently and since
r21330 the location's size was used because the source and destination
types were the same)
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@21352 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/ncgcal.pas')
-rw-r--r-- | compiler/ncgcal.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ncgcal.pas b/compiler/ncgcal.pas index 0008f6b323..7055b9d2b4 100644 --- a/compiler/ncgcal.pas +++ b/compiler/ncgcal.pas @@ -888,7 +888,7 @@ implementation if right.location.loc in [LOC_REFERENCE,LOC_CREFERENCE] then cg.a_load_ref_reg(current_asmdata.CurrAsmList,OS_ADDR,OS_ADDR,right.location.reference,pvreg) else - hlcg.a_load_loc_reg(current_asmdata.CurrAsmList,right.resultdef,right.resultdef,right.location,pvreg); + hlcg.a_load_loc_reg(current_asmdata.CurrAsmList,voidpointertype,voidpointertype,right.location,pvreg); location_freetemp(current_asmdata.CurrAsmList,right.location); { Load parameters that are in temporary registers in the |