compile on 64 bits delphi

[lcore.git] / pgtypes.pas

diff --git a/pgtypes.pas b/pgtypes.pas
index 3c139763452c701f20b1dca4ba4e7b73d323f45e..a232262c5e9ef4ceacadd6f5b9a9ec35a1b4c2b2 100644 (file)
--- a/pgtypes.pas
+++ b/pgtypes.pas
@@ -14,7 +14,11 @@ interface
     {$ifdef i386}\r
       taddrint=longint;\r
     {$else}\r
+      {$ifdef cpux64}\r
+      taddrint=int64;\r
+      {$else}\r
       taddrint=sizeint;\r
+      {$endif}\r
     {$endif}\r
     paddrint=^taddrint;\r
 \r