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

* rename an error message

Browse Source
This commit is contained in:
carl 2002-12-01 22:12:36 +00:00
parent 051cd78965
commit 6413a958a5
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/m68k/cgcpu.pas
View File

@ -976,7 +976,7 @@ Implementation
{ of the systems only support this format, the localsize cannot } { of the systems only support this format, the localsize cannot }
{ exceed 32K in size. } { exceed 32K in size. }
if (localsize < low(smallint)) or (localsize > high(smallint)) then if (localsize < low(smallint)) or (localsize > high(smallint)) then
CGMessage(cg_e_stacklimit_in_local_routine); CGMessage(cg_e_localsize_too_big);
list.concat(taicpu.op_reg_const(A_LINK,S_W,frame_pointer_reg,-localsize)); list.concat(taicpu.op_reg_const(A_LINK,S_W,frame_pointer_reg,-localsize));
end { endif localsize <> 0 } end { endif localsize <> 0 }
else else
@ -1250,7 +1250,10 @@ end.
{ {
$Log$ $Log$
Revision 1.12 2002-11-25 17:43:27 peter Revision 1.13 2002-12-01 22:12:36 carl
* rename an error message
Revision 1.12 2002/11/25 17:43:27 peter
* splitted defbase in defutil,symutil,defcmp * splitted defbase in defutil,symutil,defcmp
* merged isconvertable and is_equal into compare_defs(_ext) * merged isconvertable and is_equal into compare_defs(_ext)
* made operator search faster by walking the list only once * made operator search faster by walking the list only once