瀏覽代碼

Add dummy function result after HandleError call inside fpc_sqr_real and fpc_trunc_real compilerproc to suppress warning

git-svn-id: trunk@31851 -
pierre 10 年之前
父節點
當前提交
57bff01715
共有 1 個文件被更改,包括 4 次插入0 次删除
  1. 4 0
      rtl/jvm/math.inc

+ 4 - 0
rtl/jvm/math.inc

@@ -63,6 +63,8 @@ function fpc_sin_real(d : ValReal) : ValReal;compilerproc;{$ifdef MATHINLINE}inl
 function fpc_sqr_real(d : ValReal) : ValReal;compilerproc;{$ifdef MATHINLINE}inline;{$endif}
   begin
     HandleError(219);
+    { avoid warning }
+    result:=0;
   end;
 
 
@@ -77,6 +79,8 @@ function fpc_sqrt_real(d : ValReal) : ValReal;compilerproc;
 function fpc_trunc_real(d : ValReal) : int64;compilerproc;
   begin
     HandleError(219);
+    { avoid warning }
+    result:=0;
   end;