From 1be497efffd6a881a2b71226df816dbad37bd1ef Mon Sep 17 00:00:00 2001 From: beware Date: Mon, 27 Sep 2021 11:13:24 +0000 Subject: [PATCH] make taddrint on i386 unsigned if possible git-svn-id: file:///svnroot/lcore/trunk@162 b1de8a11-f9be-4011-bde0-cc7ace90066a --- pgtypes.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/pgtypes.pas b/pgtypes.pas index a232262..9d42a06 100644 --- a/pgtypes.pas +++ b/pgtypes.pas @@ -9,10 +9,11 @@ unit pgtypes; interface {$include pgtypes.inc} +{$include uint32.inc} type {$ifdef i386} - taddrint=longint; + taddrint=uint32; {$else} {$ifdef cpux64} taddrint=int64; -- 2.30.2