fix for delphi

[lcore.git] / pgtypes.inc

diff --git a/pgtypes.inc b/pgtypes.inc
index 4f8d2a8e57fdd6efff54e556aa35198477527cd4..6676698192b44febdf8c976a8fa8c1602f2e86ee 100644 (file)
--- 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}