summaryrefslogtreecommitdiff
path: root/compiler/ncgcal.pas
diff options
context:
space:
mode:
authorjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2012-05-20 21:11:45 +0000
committerjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2012-05-20 21:11:45 +0000
commit1adfb0ff825bae64b7930b14ccdde8c42910534e (patch)
treef5c5f8804942e3ae019efea73cd1a19054aeafb5 /compiler/ncgcal.pas
parent0b05cc3d0ffaa974fdcae3f0cf36ce1c5a39e550 (diff)
downloadfpc-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.pas2
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