From ea61e7b30761cd1f77196b3b23044b0bfd4051a1 Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Mon, 24 Sep 2012 14:39:32 +0000
Subject: [PATCH] TAChart: Fix SIGFPE on TListChartSource.SetXValue(NaN) and
 SetYValue(NaN)

git-svn-id: trunk@38812 -
---
 components/tachart/tasources.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/tachart/tasources.pas b/components/tachart/tasources.pas
index 08ef4d83d5..61c79622c3 100644
--- a/components/tachart/tasources.pas
+++ b/components/tachart/tasources.pas
@@ -578,7 +578,7 @@ var
 begin
   oldX := Item[AIndex]^.X;
   Result := AIndex;
-  if oldX = AValue then exit;
+  if IsEquivalent(oldX, AValue) then exit;
   Item[AIndex]^.X := AValue;
   UpdateExtent;
   if Sorted then begin
@@ -650,7 +650,7 @@ var
 
 begin
   oldY := Item[AIndex]^.Y;
-  if oldY = AValue then exit;
+  if IsEquivalent(oldY, AValue) then exit;
   Item[AIndex]^.Y := AValue;
   if FValuesTotalIsValid then
     FValuesTotal += NumberOr(AValue) - NumberOr(oldY);