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

+ Removed HAS_INTERNAL_INTTYPES define

Browse Source 
git-svn-id: trunk@303 -
This commit is contained in:
michael 2005-06-09 17:50:58 +00:00
parent f7edd5a256
commit 684b7fa85f
1 changed files with 0 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
rtl/inc/systemh.inc
View File

@ -56,23 +56,11 @@
****************************************************************************}
Type
{$Ifdef HAS_INTERNAL_INTTYPES}
{ The compiler has all integer types defined internally. Here
we define only aliases }
DWord = LongWord;
Cardinal = LongWord;
Integer = SmallInt;
{$else HAS_INTERNAL_INTTYPES}
ShortInt = -128..127;
SmallInt = -32768..32767;
{ can't use -2147483648 because of a bug in 1.0.2's val() procedure (JM) }
Longint = +(-2147483647-1)..$7fffffff;
Byte = 0..255;
Word = 0..65535;
DWord = LongWord;
Cardinal = LongWord;
Integer = SmallInt;
{$endif HAS_INTERNAL_INTTYPES}
{$ifdef CPUI386}
{ for bootstrapping with 1.0.x }