Browse Source

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 years ago
parent
commit
57bff01715
1 changed files with 4 additions and 0 deletions
  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}
 function fpc_sqr_real(d : ValReal) : ValReal;compilerproc;{$ifdef MATHINLINE}inline;{$endif}
   begin
   begin
     HandleError(219);
     HandleError(219);
+    { avoid warning }
+    result:=0;
   end;
   end;
 
 
 
 
@@ -77,6 +79,8 @@ function fpc_sqrt_real(d : ValReal) : ValReal;compilerproc;
 function fpc_trunc_real(d : ValReal) : int64;compilerproc;
 function fpc_trunc_real(d : ValReal) : int64;compilerproc;
   begin
   begin
     HandleError(219);
     HandleError(219);
+    { avoid warning }
+    result:=0;
   end;
   end;