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

*** empty log message ***

Browse Source
This commit is contained in:
peter 2003-03-17 22:20:08 +00:00
parent 4be7d9ddeb
commit bb15f5641e
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/pmodules.pas
View File

@ -1281,7 +1281,7 @@ implementation
gen_main_procsym(current_module.modulename^+'_main',potype_proginit,st); gen_main_procsym(current_module.modulename^+'_main',potype_proginit,st);
aktprocdef.aliasnames.insert(target_info.cprefix+current_module.modulename^+'_main'); aktprocdef.aliasnames.insert(target_info.cprefix+current_module.modulename^+'_main');
{ Win32 startup code needs a single name } { Win32 startup code needs a single name }
if (target_info.system in [system_i386_win32,system_i386_wdosx]) then // if (target_info.system in [system_i386_win32,system_i386_wdosx]) then
aktprocdef.aliasnames.insert('PASCALMAIN'); aktprocdef.aliasnames.insert('PASCALMAIN');
{ this code is called from C so we need to save some { this code is called from C so we need to save some
registers } registers }
@ -1444,7 +1444,10 @@ So, all parameters are passerd into registers in sparc architecture.}
end. end.
{ {
$Log$ $Log$
Revision 1.97 2003-03-17 13:36:39 peter Revision 1.98 2003-03-17 22:20:08 peter
*** empty log message ***
Revision 1.97 2003/03/17 13:36:39 peter
* fix import linking under linux * fix import linking under linux
Revision 1.96 2003/02/19 22:00:14 daniel Revision 1.96 2003/02/19 22:00:14 daniel