From 7839389a75b803b3f9e3c88a8f269c178497cdb2 Mon Sep 17 00:00:00 2001 From: beware Date: Thu, 13 Mar 2014 07:10:11 +0000 Subject: [PATCH] fix for delphi git-svn-id: file:///svnroot/lcore/trunk@133 b1de8a11-f9be-4011-bde0-cc7ace90066a --- pgtypes.inc | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/pgtypes.inc b/pgtypes.inc index 4f8d2a8..6676698 100644 --- a/pgtypes.inc +++ b/pgtypes.inc @@ -8,6 +8,13 @@ {$endif} -{$ifdef i386}{$define ENDIAN_LITTLE}{$asmmode intel}{$endif} -{$ifdef cpux64}{$define ENDIAN_LITTLE}{$asmmode intel}{$endif} +{$ifdef i386} +{$define ENDIAN_LITTLE} +{$ifdef fpc}{$asmmode intel}{$endif} +{$endif} + +{$ifdef cpux64} +{$define ENDIAN_LITTLE} +{$ifdef fpc}{$asmmode intel}{$endif} +{$endif} -- 2.30.2