* ensure that softfloat and libgcc float never use rfs/wfs

git-svn-id: trunk@7229 -

rtl/arm/arm.inc

@@ -23,7 +23,7 @@ const
 
 procedure fpc_cpuinit;
 begin
-{$if not(defined(wince)) and not(defined(gba)) and not(defined(nds))}
+{$if not(defined(wince)) and not(defined(gba)) and not(defined(nds)) and not(defined(FPUSOFT)) and not(defined(FPULIBGCC))}
   asm
     rfs r0
     and r0,r0,#0xffe0ffff

rtl/arm/mathu.inc

@@ -212,7 +212,7 @@ end;
 }
 
 
-{$if not(defined(gba)) and not(defined(nds))}
+{$if not(defined(gba)) and not(defined(nds)) and not(defined(FPUSOFT)) and not(defined(FPULIBGCC))}
 const
   _FPU_MASK_IM  =  $00010000;      { invalid operation      }
   _FPU_MASK_ZM  =  $00020000;      { divide by zero         }
@@ -263,7 +263,7 @@ function GetExceptionMask: TFPUExceptionMask;
   var
     cw : dword;
   begin
-{$if not(defined(gba)) and not(defined(nds))}
+{$if not(defined(gba)) and not(defined(nds)) and not(defined(FPUSOFT)) and not(defined(FPULIBGCC))}
     Result:=[];
     cw:=FPU_GetCW;
 
@@ -294,7 +294,7 @@ function SetExceptionMask(const Mask: TFPUExceptionMask): TFPUExceptionMask;
   var
     cw : dword;
   begin
-{$if not(defined(gba)) and not(defined(nds))}
+{$if not(defined(gba)) and not(defined(nds)) and not(defined(FPUSOFT)) and not(defined(FPULIBGCC))}
     cw:=FPU_GetCW or _FPU_MASK_ALL;
 
     if exInvalidOp in Mask then