diff options
author | tom_at_work <tom_at_work@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2005-10-26 19:42:12 +0000 |
---|---|---|
committer | tom_at_work <tom_at_work@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2005-10-26 19:42:12 +0000 |
commit | 6d5dc821c401a9a57c8e6500ab4dc85fb9305b0a (patch) | |
tree | 6a641a64109731e595abce4c246533a29f042f1a /compiler/ncgld.pas | |
parent | fff169e7789525538c029c806de08ae79534dac6 (diff) | |
download | fpc-6d5dc821c401a9a57c8e6500ab4dc85fb9305b0a.tar.gz |
* fixed code generation for calling threadvar relocation function
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@1597 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/ncgld.pas')
-rw-r--r-- | compiler/ncgld.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ncgld.pas b/compiler/ncgld.pas index c97ffbeed3..8e6ce01269 100644 --- a/compiler/ncgld.pas +++ b/compiler/ncgld.pas @@ -167,7 +167,7 @@ implementation { don't save the allocated register else the result will be destroyed later } reference_reset_symbol(href,objectlibrary.newasmsymbol(tglobalvarsym(symtableentry).mangledname,AB_EXTERNAL,AT_DATA),0); paramanager.allocparaloc(exprasmlist,paraloc1); - cg.a_param_ref(exprasmlist,OS_ADDR,href,paraloc1); + cg.a_param_ref(exprasmlist,OS_32,href,paraloc1); paramanager.freeparaloc(exprasmlist,paraloc1); paraloc1.done; cg.allocallcpuregisters(exprasmlist); |