diff options
| author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2014-08-10 13:18:34 +0000 |
|---|---|---|
| committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2014-08-10 13:18:34 +0000 |
| commit | 55426794cdcb9d0bfcc33c7ca31217164968b2ff (patch) | |
| tree | cc3dfa813ef9ec0cc5ae4eaafbfa6789578b35d0 /compiler/hlcgobj.pas | |
| parent | 26c9e0edbd6c2af4b6c7d279ca6e174339d27927 (diff) | |
| download | fpc-55426794cdcb9d0bfcc33c7ca31217164968b2ff.tar.gz | |
* fixed the type specified to reference_reset_base() in
thlcgobj.paravarsym_set_initialloc_to_paraloc(): it has to be the type of
pointer in the base register, not the type of the variable (and since this
is a parameter on the stack, use voidstackpointertype rather than
getpointerdef() for i8086 compatibility)
git-svn-id: http://svn.freepascal.org/svn/fpc/branches/hlcgllvm@28351 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/hlcgobj.pas')
| -rw-r--r-- | compiler/hlcgobj.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/hlcgobj.pas b/compiler/hlcgobj.pas index 2203be9bd8..473858136f 100644 --- a/compiler/hlcgobj.pas +++ b/compiler/hlcgobj.pas @@ -4305,7 +4305,7 @@ implementation procedure thlcgobj.paravarsym_set_initialloc_to_paraloc(vs: tparavarsym); begin - reference_reset_base(vs.initialloc.reference,vs.vardef,tparavarsym(vs).paraloc[calleeside].location^.reference.index, + reference_reset_base(vs.initialloc.reference,voidstackpointertype,tparavarsym(vs).paraloc[calleeside].location^.reference.index, tparavarsym(vs).paraloc[calleeside].location^.reference.offset,tparavarsym(vs).paraloc[calleeside].alignment); end; |