From e083259f88f61b9d06e0273d42f6e8e675a88c8d Mon Sep 17 00:00:00 2001
From: s_alexander <s_alexander@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sat, 5 Dec 2009 14:00:19 +0000
Subject: added SizeInt for non-fpc compilers

added SizeInt (as Integer or Int64) for non-fpc compilers (taken from JclBase)

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1967 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 src/lib/pcre/pcre.pas | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'src/lib/pcre')

diff --git a/src/lib/pcre/pcre.pas b/src/lib/pcre/pcre.pas
index d3fa2f28..9e40c347 100644
--- a/src/lib/pcre/pcre.pas
+++ b/src/lib/pcre/pcre.pas
@@ -368,7 +368,15 @@ function CallPCRECallout(var callout_block: pcre_callout_block): Integer;
 
 type
   TPCRELibNotLoadedHandler = procedure; cdecl;
-
+  {$IFNDEF FPC}
+  {$IFDEF CPU32}
+  SizeInt = Integer;
+  {$ENDIF CPU32}
+  {$IFDEF CPU64}
+  SizeInt = Int64;
+  {$ENDIF CPU64}
+  PPAnsiChar = ^PAnsiChar;
+  {$ENDIF ~FPC}
   PPPAnsiChar = ^PPAnsiChar;
 
 var
-- 
cgit v1.2.3