* Call HandleError in fpc_exp_real for overflow and underflow. It fixes webtbs/tw3157.pp for targets where generic fpc_exp_real is used.

git-svn-id: trunk@5948 -

rtl/inc/genmath.inc

@@ -727,15 +727,9 @@ type
                   end;
               end;
             if d > o_threshold then
-              begin
-                result:=huge*huge; { overflow }
-                exit;
-              end;
+              HandleError(205); { overflow }
             if d < u_threshold then
-              begin
-                result:=twom1000*twom1000; { underflow }
-                exit;
-              end;
+              HandleError(206); { underflow }
           end;
 
         { argument reduction }