From 134427700be85b4c5cc6b646a62ee63c5d0a8cee Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Mon, 6 Aug 2007 13:44:13 +0000
Subject: [PATCH]   * disabled overloaded operators for non-x86 because they
 don't compile     (the value is a packed array of bytes in this case, not a
 record)

git-svn-id: trunk@8231 -
---
 rtl/inc/ctypes.pp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/rtl/inc/ctypes.pp b/rtl/inc/ctypes.pp
index 40f52ad797..7161de1b23 100644
--- a/rtl/inc/ctypes.pp
+++ b/rtl/inc/ctypes.pp
@@ -136,6 +136,7 @@ operator <=(const c:clongdouble;const e:Extended) r:boolean;inline;
 {Non-x86 typically doesn't have extended. To be fixed once this changes.}
 operator := (const v:clongdouble) r:double;inline;
 operator := (const v:double) r:clongdouble;inline;
+{$ifdef dummy}
 operator +(const e:Double;const c:clongdouble) r:Double;inline;
 operator +(const c:clongdouble;const e:Double) r:Double;inline;
 operator -(const e:Double;const c:clongdouble) r:Double;inline;
@@ -154,6 +155,7 @@ operator >=(const e:Double;const c:clongdouble) r:boolean;inline;
 operator >=(const c:clongdouble;const e:Double) r:boolean;inline;
 operator <=(const e:Double;const c:clongdouble) r:boolean;inline;
 operator <=(const c:clongdouble;const e:Double) r:boolean;inline;
+{$endif dummy}
 {$endif}
 
 implementation
@@ -288,6 +290,10 @@ begin
   Pword(@r[r128_mantissa_ofs+12])^:=0;
 end;
 
+{$ifdef dummy}
+
+// There is no record with a value field in this case
+
 operator +(const e:Double;const c:clongdouble) r:Double;inline;
 begin
   r:=e+c.value;
@@ -378,5 +384,6 @@ begin
   r:=c.value<=e;
 end;
 {$endif}
+{$endif}
 
 end.