--- Merging r24285 into '.':

U    rtl/inc/system.fpd
--- Merging r24292 into '.':
G    rtl/inc/system.fpd

# revisions: 24285,24292
r24285 | marco | 2013-04-21 15:55:29 +0200 (Sun, 21 Apr 2013) | 3 lines
Changed paths:
   M /trunk/rtl/inc/system.fpd

 * some dummy types for basetypes to avoid warnings. Probably their
   lemma's should refer to the reference guide.
r24292 | marco | 2013-04-21 21:01:23 +0200 (Sun, 21 Apr 2013) | 2 lines
Changed paths:
   M /trunk/rtl/inc/system.fpd

 * more dummy declarations for basetypes.

git-svn-id: branches/fixes_2_6@24940 -

rtl/inc/system.fpd

@@ -14,6 +14,14 @@
 
  **********************************************************************}
 
+Type 
+   Byte    = 0..255;
+   Longint = -2147483648..2147483647;
+   Longword= 0..4294967295;
+   Shortint= -128 .. 127;
+   Smallint= -32768 .. 32767;
+   Word    = 0 .. 65535;
+   WideChar= #$0000..#$FFFF;
 Function Addr (X : TAnytype) : Pointer;
 Procedure Assert(Expr : Boolean); 
 Procedure Assert(Expr : Boolean; const Msg : string);