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

* added missing then, Carl did you really a make fullcycle :) ?

Browse Source
This commit is contained in:
florian 2002-12-05 14:39:21 +00:00
parent 121ca40b39
commit fbbaf36800
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/ncgutil.pas
View File

@ -1754,7 +1754,7 @@ function returns in a register and the caller receives it in an other one}
{ give a warning if the limit of parameters allowed for
certain processors is reached.
}
if (parasize > maxparasize)
if (parasize > maxparasize) then
Message(cg_w_parasize_too_big);
{$endif}
cg.g_return_from_proc(list,parasize);
@ -1902,7 +1902,10 @@ function returns in a register and the caller receives it in an other one}
end.
{
$Log$
Revision 1.69 2002-12-03 22:13:39 carl
Revision 1.70 2002-12-05 14:39:21 florian
* added missing then, Carl did you really a make fullcycle :) ?
Revision 1.69 2002/12/03 22:13:39 carl
* bugfix of problems with profile code which clobbers some registers
Revision 1.68 2002/12/01 22:06:59 carl