Ver Fonte

Set float type information in system interface part for mips64 and mips64el CPUs

Pierre Muller há 3 anos atrás
pai
commit
fbed068048
1 ficheiros alterados com 13 adições e 0 exclusões
  1. 13 0
      rtl/inc/systemh.inc

+ 13 - 0
rtl/inc/systemh.inc

@@ -269,6 +269,19 @@ Type
   {$endif}
   {$endif}
 {$endif CPUMIPS32}
 {$endif CPUMIPS32}
 
 
+{$if defined(CPUMIPS64) or defined(CPUMIPS64EL)}
+  {$define DEFAULT_DOUBLE}
+
+  {$define FPC_INCLUDE_SOFTWARE_SHIFT_INT64}
+
+  {$define SUPPORT_SINGLE}
+  {$define SUPPORT_DOUBLE}
+
+  {$define FPC_INCLUDE_SOFTWARE_INT64_TO_DOUBLE}
+
+  ValReal = Double;
+{$endif CPUMIPS64}
+
 
 
 {$ifdef CPUARM}
 {$ifdef CPUARM}
   {$define DEFAULT_DOUBLE}
   {$define DEFAULT_DOUBLE}