瀏覽代碼

* MIPS: don't generate FPU code for int to real conversion when FPU emulation is enabled

Nikolay Nikolov 10 月之前
父節點
當前提交
b077d17cdd
共有 1 個文件被更改,包括 5 次插入0 次删除
  1. 5 0
      compiler/mips/ncpucnv.pas

+ 5 - 0
compiler/mips/ncpucnv.pas

@@ -74,6 +74,11 @@ function tmipseltypeconvnode.first_int_to_real: tnode;
 var
 var
   fname: string[19];
   fname: string[19];
 begin
 begin
+  if cs_fp_emulation in current_settings.moduleswitches then
+    begin
+      result:=inherited;
+      exit;
+    end;
   { converting a 64bit integer to a float requires a helper }
   { converting a 64bit integer to a float requires a helper }
   if is_64bitint(left.resultdef) or
   if is_64bitint(left.resultdef) or
      is_currency(left.resultdef) then
      is_currency(left.resultdef) then