paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-07 20:29:28 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed implicit init/final code for units, stack frame was wrong for ppc

Browse Source
This commit is contained in:
florian 2003-05-11 19:31:28 +00:00
parent fa27f77a17
commit 76f18e2fc9
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/pmodules.pas
View File

@ -800,6 +800,7 @@ implementation
nostackframe:=false;
objectlibrary.getlabel(aktexitlabel);
objectlibrary.getlabel(aktexit2label);
include(current_procinfo.flags,pi_do_call);
genentrycode(list,true,0,parasize,nostackframe,false);
genexitcode(list,parasize,nostackframe,false);
list.convert_registers;
@ -1483,7 +1484,10 @@ So, all parameters are passerd into registers in sparc architecture.}
end.
{
$Log$
Revision 1.104 2003-04-28 21:19:02 peter
Revision 1.105 2003-05-11 19:31:28 florian
* fixed implicit init/final code for units, stack frame was wrong for ppc
Revision 1.104 2003/04/28 21:19:02 peter
* fix stabs generation for implicit initfinal
Revision 1.103 2003/04/27 11:21:34 peter