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

- remove duplicate constants

Browse Source 
- move some constants to cginfo
This commit is contained in:
carl 2002-04-21 15:28:06 +00:00
parent aab3219beb
commit 75c39ebf55
1 changed files with 5 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/cgbase.pas
View File

@ -38,18 +38,6 @@ unit cgbase;
;
const
tcgsize2size: Array[tcgsize] of longint = (0,
8,16,32,64,8,16,32,64,
32,64,EXTENDED_SIZE*8,64,
8,16,32,64,128,8,16,32,64,128);
tfloat2tcgsize: array[tfloattype] of tcgsize =
(OS_F32,OS_F64,OS_F80,OS_C64);
tcgsize2tfloat: array[OS_F32..OS_C64] of tfloattype =
(s32real,s64real,s80real,s64comp);
const
{# bitmask indicating if the procedure uses asm }
@ -529,7 +517,11 @@ begin
end.
{
$Log$
Revision 1.11 2002-04-20 21:32:23 carl
Revision 1.12 2002-04-21 15:28:06 carl
- remove duplicate constants
- move some constants to cginfo
Revision 1.11 2002/04/20 21:32:23 carl
+ generic FPC_CHECKPOINTER
+ first parameter offset in stack now portable
* rename some constants