[fpc-pascal] FPCUnit checking Single values

[ik]

Hello,

I'm trying to check Single value.

I'm doing the following:

a := 1.1;
b := 1.1;
CheckEquals(a, b, Format('val %f does not equal %f', [a, b]));

It reports an error, one of them are 1.1 and the other is 1,10 .
I know about the possible drifts of floating points, but how can I
create a test for such type of values ?

Thanks,
Ido