TAChart: Fix numlib issue of returning 0 for exp() function (https://forum.lazarus.freepascal.org/index.php/topic,42913.msg299793)

git-svn-id: trunk@59320 -

components/tachart/tafuncseries.pas

@@ -528,6 +528,14 @@ begin
     X(AXText).Y(AYText).NumFormat(ANumFormat).Params(AParams);
 end;
 
+// Workaround for numlib issue with too-small arguments of exp()
+// https://bugs.freepascal.org/view.php?id=34434
+function exp(x: ArbFloat): ArbFloat;
+begin
+  Result := system.exp(x);
+end;
+
+
 { TColorMapLegendItem }
 
 constructor TLegendItemColorMap.Create(