paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-02 08:50:56 +02:00
Code Issues Packages Projects Releases Wiki Activity

* put every proc in a new object file

Browse Source
This commit is contained in:
peter 2004-07-10 20:24:34 +00:00
parent f1bda1700a
commit 7373a649f1
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/psub.pas
View File

@ -849,6 +849,7 @@ implementation
end; end;
{ add the procedure to the codesegment } { add the procedure to the codesegment }
maybe_new_object_file(codesegment);
new_section(codesegment,sec_code,lower(procdef.mangledname),aktalignment.procalign); new_section(codesegment,sec_code,lower(procdef.mangledname),aktalignment.procalign);
codesegment.concatlist(aktproccode); codesegment.concatlist(aktproccode);
@ -1383,7 +1384,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.198 2004-07-09 22:17:32 peter Revision 1.199 2004-07-10 20:24:34 peter
* put every proc in a new object file
Revision 1.198 2004/07/09 22:17:32 peter
* revert has_localst patch * revert has_localst patch
* replace aktstaticsymtable/aktglobalsymtable with current_module * replace aktstaticsymtable/aktglobalsymtable with current_module