[fpc-devel]MATH.PP

[Медведев Слава]

Hello, developers,

It seems to be a bug in MATH.PP 1.1.2.2 in arcsin function.
I think, this is incorrect:
if abs(x) > 1 then InvalidArgument
I added these strings:
const Epsilon = 1.0e-9;
....
if (x-1)<=Epsilon then x:=1;
if (x+1)<=Epsilon then x:=-1;

I made these changes because of InvalidArgument exception when arcsin
parameter (displayed by GDB) is 1 (but, I think, it was near 1, but
not 1).

Best regards,
 Medvedev                          mailto:medvedev at mtu-net.ru