Thumb(2): fix compilation after FPU control word changes

Resolves #39966

rtl/arm/cpuh.inc

@@ -13,6 +13,9 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
-
+{$if defined(CPUTHUMB) or defined(CPUTHUMB2)}
+  {$define FPC_SYSTEM_FPUCW_IMMUTABLE}
+{$else}
 type
   TNativeFPUControlWord = dword;
+{$endif}

rtl/arm/thumb2.inc

@@ -62,7 +62,6 @@ begin
   { FPU precision 64 bit, rounding to nearest, affine infinity }
   _controlfp($000C0003, $030F031F);
 end;
-{$endif wince}
 
 {$define FPC_SYSTEM_HAS_GETSETNATIVEFPUCONTROLWORD}
 function GetNativeFPUControlWord: TNativeFPUControlWord;
@@ -74,6 +73,7 @@ procedure SetNativeFPUControlWord(const cw: TNativeFPUControlWord);
   begin
     _controlfp(cw,$ffffffff);
   end;
+{$endif wince}
 
 
 {****************************************************************************