mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 16:29:24 +02:00
* vmtpointer_offset must be adjusted in after_pass1 as well
This commit is contained in:
parent
7b8ac3c767
commit
77d8f335aa
@ -461,7 +461,10 @@ end;
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.7 2003-04-22 14:33:38 peter
|
Revision 1.8 2003-05-10 23:57:23 florian
|
||||||
|
* vmtpointer_offset must be adjusted in after_pass1 as well
|
||||||
|
|
||||||
|
Revision 1.7 2003/04/22 14:33:38 peter
|
||||||
* removed some notes/hints
|
* removed some notes/hints
|
||||||
|
|
||||||
Revision 1.6 2002/05/18 13:34:06 peter
|
Revision 1.6 2002/05/18 13:34:06 peter
|
||||||
|
@ -81,6 +81,7 @@ unit cpupi;
|
|||||||
inc(procdef.parast.address_fixup,ofs);
|
inc(procdef.parast.address_fixup,ofs);
|
||||||
inc(framepointer_offset,ofs);
|
inc(framepointer_offset,ofs);
|
||||||
inc(selfpointer_offset,ofs);
|
inc(selfpointer_offset,ofs);
|
||||||
|
inc(vmtpointer_offset,ofs);
|
||||||
if cs_asm_source in aktglobalswitches then
|
if cs_asm_source in aktglobalswitches then
|
||||||
aktproccode.insert(Tai_comment.Create(strpnew('Parameter copies start at: r1+'+tostr(procdef.parast.address_fixup))));
|
aktproccode.insert(Tai_comment.Create(strpnew('Parameter copies start at: r1+'+tostr(procdef.parast.address_fixup))));
|
||||||
|
|
||||||
@ -114,7 +115,10 @@ begin
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.13 2003-05-09 19:00:30 jonas
|
Revision 1.14 2003-05-10 23:57:23 florian
|
||||||
|
* vmtpointer_offset must be adjusted in after_pass1 as well
|
||||||
|
|
||||||
|
Revision 1.13 2003/05/09 19:00:30 jonas
|
||||||
* call inherited after_header as well
|
* call inherited after_header as well
|
||||||
|
|
||||||
Revision 1.12 2003/04/27 11:21:36 peter
|
Revision 1.12 2003/04/27 11:21:36 peter
|
||||||
|
Loading…
Reference in New Issue
Block a user