- i386 and x86_64: Once softfloat stuff has been cleaned up, SysResetFPU and SysInitFPU end up doing exactly the same. Removed one of them.

git-svn-id: trunk@27280 -

rtl/i386/i386.inc

@@ -1327,10 +1327,6 @@ const
   FPU_StackOverflow = $40;
   FPU_ExceptionMask = $ff;
 
-  { use Default8087CW instead
-  fpucw : word = $1300 or FPU_StackUnderflow or FPU_Underflow or FPU_Denormal;
-  }
-
   MM_MaskInvalidOp = %0000000010000000;
   MM_MaskDenorm    = %0000000100000000;
   MM_MaskDivZero   = %0000001000000000;
@@ -1343,25 +1339,7 @@ const
 
 {$define FPC_SYSTEM_HAS_SYSINITFPU}
 Procedure SysInitFPU;
-  var
-    { these locals are so we don't have to hack pic code in the assembler }
-    localmxcsr: dword;
-    localfpucw: word;
   begin
-    localfpucw:=Default8087CW;
-    asm
-      fninit
-      fldcw   localfpucw
-      fwait
-    end;
-    if has_sse_support then
-      begin
-        localmxcsr:=mxcsr;
-        asm
-          { setup sse exceptions }
-          ldmxcsr localmxcsr
-        end;
-      end;
   end;
 
 
@@ -1432,8 +1410,6 @@ procedure fpc_cpucodeinit;
       end;
 
     SysResetFPU;
-    if not(IsLibrary) then
-      SysInitFPU;
 {$ifdef USE_FASTMOVE}
     setup_fastmove;
 {$endif}

rtl/x86_64/x86_64.inc

@@ -925,8 +925,6 @@ const
   FPU_StackOverflow = $40;
   FPU_ExceptionMask = $ff;
 
-  fpucw : word = $1300 or FPU_StackUnderflow or FPU_Underflow or FPU_Denormal;
-
   MM_MaskInvalidOp = %0000000010000000;
   MM_MaskDenorm    = %0000000100000000;
   MM_MaskDivZero   = %0000001000000000;
@@ -945,25 +943,11 @@ procedure fpc_cpuinit;
         mxcsr:=GetSSECSR;
       end;
     SysResetFPU;
-    if not(IsLibrary) then
-      SysInitFPU;
   end;
 
 {$define FPC_SYSTEM_HAS_SYSINITFPU}
 Procedure SysInitFPU;
-  var
-    { these locals are so we don't have to hack pic code in the assembler }
-    localmxcsr: dword;
-    localfpucw: word;
-
 begin
-  localmxcsr:=mxcsr;
-  localfpucw:=fpucw;
-  asm
-    fldcw localfpucw
-    { set sse exceptions }
-    ldmxcsr localmxcsr
-  end ['RAX'];
 end;