make taddrint on i386 unsigned if possible
[lcore.git] / pgtypes.pas
index a232262c5e9ef4ceacadd6f5b9a9ec35a1b4c2b2..9d42a060c0870324298d212a96bee5488dbf9eb2 100644 (file)
@@ -9,10 +9,11 @@ unit pgtypes;
 interface\r
 \r
 {$include pgtypes.inc}\r
+{$include uint32.inc}\r
 \r
   type\r
     {$ifdef i386}\r
-      taddrint=longint;\r
+      taddrint=uint32;\r
     {$else}\r
       {$ifdef cpux64}\r
       taddrint=int64;\r