fpspreadsheet: Relax error margin for date/time tests to 10 nsec in order to get success in tests back.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3335 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2014-07-19 10:45:17 +00:00
parent 752b1c95e7
commit 18ae11e3e8
2 changed files with 3 additions and 1 deletions

View File

@ -372,7 +372,8 @@ var
ActualDateTime: TDateTime;
ErrorMargin: TDateTime; //margin for error in comparison test
begin
ErrorMargin:=0.000000000000001;
//ErrorMargin:=0.000000000000001; // = 1E-15 = 9E-11 sec
ErrorMargin := 1E-5/(24*60*60*1000); // = 10 nsec = 1E-8 sec // 1 ns fails
if Row>High(SollDates) then
fail('Error in test code: array bounds overflow. Check array size is correct.');

View File

@ -80,6 +80,7 @@
<Unit1>
<Filename Value="datetests.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="datetests"/>
</Unit1>
<Unit2>
<Filename Value="stringtests.pas"/>