Browse Source

Simplify.

Martijn Laan 5 years ago
parent
commit
f03a8a984b
1 changed files with 2 additions and 7 deletions
  1. 2 7
      Projects/SafeDLLPath.pas

+ 2 - 7
Projects/SafeDLLPath.pas

@@ -83,16 +83,11 @@ var
 begin
   SaveErrorMode := SetErrorMode(SEM_NOOPENFILEERRORBOX);
   try
-    asm
-      FNSTCW SaveFPUControlWord
-    end;
+    SaveFPUControlWord := Get8087Cw;
     try
       Result := LoadLibrary(PChar(Filename));
     finally
-      asm
-        FNCLEX
-        FLDCW SaveFPUControlWord
-      end;
+      Set8087Cw(SaveFPUControlWord);
     end;
   finally
     SetErrorMode(SaveErrorMode);