From be67af43747a7ff070ee48488ecc31c97f1ec762 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Fri, 8 Jun 2012 09:33:03 +0000
Subject: [PATCH]  * Adapt to mipsel compiler defining cpumipsel and
 cpumipsel32 but not cpumips anymore

git-svn-id: trunk@21541 -
---
 rtl/inc/system.inc  | 16 +++++++++-------
 rtl/inc/systemh.inc |  2 +-
 2 files changed, 10 insertions(+), 8 deletions(-)

diff --git a/rtl/inc/system.inc b/rtl/inc/system.inc
index 4b9e79679e..25d04d563b 100644
--- a/rtl/inc/system.inc
+++ b/rtl/inc/system.inc
@@ -231,6 +231,14 @@ function do_isdevice(handle:thandle):boolean;forward;
   {$define SYSPROCDEFINED}
 {$endif cpuavr}
 
+{$ifdef cpumipsel}
+  {$ifdef SYSPROCDEFINED}
+    {$Error Can't determine processor type !}
+  {$endif}
+  { there is no mipsel.inc, we use mips.inc instead }
+  {$i mips.inc}  { Case dependent, don't change }
+  {$define SYSPROCDEFINED}
+{$else not cpumipsel}
 {$ifdef cpumips}
   {$ifdef SYSPROCDEFINED}
     {$Error Can't determine processor type !}
@@ -238,14 +246,8 @@ function do_isdevice(handle:thandle):boolean;forward;
   {$i mips.inc}  { Case dependent, don't change }
   {$define SYSPROCDEFINED}
 {$endif cpumips}
+{$endif not cpumipsel}
 
-{$ifdef cpumipsel}
-  {$ifdef SYSPROCDEFINED}
-    {$Error Can't determine processor type !}
-  {$endif}
-  {$i mipsel.inc}  { Case dependent, don't change }
-  {$define SYSPROCDEFINED}
-{$endif cpumipsel}
 
 {$ifndef SYSPROCDEFINED}
   {$Error Can't determine processor type !}
diff --git a/rtl/inc/systemh.inc b/rtl/inc/systemh.inc
index 6a86f7dc74..511a4487a1 100644
--- a/rtl/inc/systemh.inc
+++ b/rtl/inc/systemh.inc
@@ -194,7 +194,7 @@ Type
   FarPointer = Pointer;
 {$endif CPUSPARC}
 
-{$ifdef CPUMIPS32}
+{$if defined(CPUMIPS32) or defined(CPUMIPSEL32)}
   {$define DEFAULT_DOUBLE}
 
   {$define SUPPORT_SINGLE}