[Maxima-commits] CVS: maxima/tests rtest15.mac,1.75,1.76

[Raymond T. <rt...@us...>]

Update of /cvsroot/maxima/maxima/tests
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv13736/tests

Modified Files:
	rtest15.mac 
Log Message:
src/float.lisp:
o FPSINH was causing an error for very negative numbers.  Fix this by
  using the fact sinh(-x) = -sinh(x).

tests/rtest15.mac:
o Add a test case for the above. 


Index: rtest15.mac
===================================================================
RCS file: /cvsroot/maxima/maxima/tests/rtest15.mac,v
retrieving revision 1.75
retrieving revision 1.76
diff -u -d -r1.75 -r1.76
--- rtest15.mac	25 Feb 2009 00:22:25 -0000	1.75
+++ rtest15.mac	27 Feb 2009 02:04:24 -0000	1.76
@@ -1006,3 +1006,6 @@
 errcatch (bfloat (2*foo + 3*bar));
 [];
 
+/* Test that sinh(-x) for large x doesn't crash */
+sinh(-100b0)+sinh(100b0);
+0b0;