# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1249372538 -7200
# Node ID 3df527f71cee4c32e44203a52190b268f45138eb
# Parent  bf90777b58c95f5a794e2a458d6e44f1f9ec7bd3
use complex function for acos mapper if arg is out of range [-1, 1]

diff -r bf90777b58c9 -r 3df527f71cee src/ChangeLog
--- a/src/ChangeLog	Tue Aug 04 09:52:53 2009 +0200
+++ b/src/ChangeLog	Tue Aug 04 09:55:38 2009 +0200
@@ -1,3 +1,9 @@
+2009-07-29  John W. Eaton  <jwe@octave.org>
+
+	* ov-float.cc, ov-flt-re-mat.cc, ov-re-mat.cc, ov-re-sparse.cc,
+	ov-scalar.cc: Use complex function for acos mapper if arg is out
+	of range [-1, 1].
+
 2009-07-29  John W. Eaton  <jwe@octave.org>
 
 	* parse.y (param_list_end): Also set
diff -r bf90777b58c9 -r 3df527f71cee src/ov-float.cc
--- a/src/ov-float.cc	Tue Aug 04 09:52:53 2009 +0200
+++ b/src/ov-float.cc	Tue Aug 04 09:55:38 2009 +0200
@@ -279,7 +279,7 @@
 SCALAR_MAPPER (gamma, xgamma)
 CD_SCALAR_MAPPER (lgamma, xlgamma, xlgamma, 0.0, octave_Float_Inf)
 SCALAR_MAPPER (abs, ::fabsf)
-SCALAR_MAPPER (acos, ::acosf)
+CD_SCALAR_MAPPER (acos, ::acosf, ::acos, -1.0, 1.0)
 CD_SCALAR_MAPPER (acosh, ::acoshf, ::acosh, 1.0, octave_Float_Inf)
 SCALAR_MAPPER (angle, ::arg)
 SCALAR_MAPPER (arg, ::arg)
diff -r bf90777b58c9 -r 3df527f71cee src/ov-flt-re-mat.cc
--- a/src/ov-flt-re-mat.cc	Tue Aug 04 09:52:53 2009 +0200
+++ b/src/ov-flt-re-mat.cc	Tue Aug 04 09:55:38 2009 +0200
@@ -783,7 +783,7 @@
 ARRAY_MAPPER (erfc, FloatNDArray::dmapper, ::erfcf)
 ARRAY_MAPPER (gamma, FloatNDArray::dmapper, xgamma)
 CD_ARRAY_MAPPER (lgamma, xlgamma, xlgamma, 0.0, octave_Float_Inf)
-ARRAY_MAPPER (acos, FloatNDArray::dmapper, ::acosf)
+CD_ARRAY_MAPPER (acos, ::acosf, ::acos, -1.0, 1.0)
 CD_ARRAY_MAPPER (acosh, ::acoshf, ::acosh, 1.0, octave_Float_Inf)
 ARRAY_MAPPER (angle, FloatNDArray::dmapper, ::arg)
 ARRAY_MAPPER (arg, FloatNDArray::dmapper, ::arg)
diff -r bf90777b58c9 -r 3df527f71cee src/ov-re-mat.cc
--- a/src/ov-re-mat.cc	Tue Aug 04 09:52:53 2009 +0200
+++ b/src/ov-re-mat.cc	Tue Aug 04 09:55:38 2009 +0200
@@ -811,7 +811,7 @@
 ARRAY_MAPPER (erfc, NDArray::dmapper, ::erfc)
 ARRAY_MAPPER (gamma, NDArray::dmapper, xgamma)
 CD_ARRAY_MAPPER (lgamma, xlgamma, xlgamma, 0.0, octave_Inf)
-ARRAY_MAPPER (acos, NDArray::dmapper, ::acos)
+CD_ARRAY_MAPPER (acos, ::acos, ::acos, -1.0, 1.0)
 CD_ARRAY_MAPPER (acosh, ::acosh, ::acosh, 1.0, octave_Inf)
 ARRAY_MAPPER (angle, NDArray::dmapper, ::arg)
 ARRAY_MAPPER (arg, NDArray::dmapper, ::arg)
diff -r bf90777b58c9 -r 3df527f71cee src/ov-re-sparse.cc
--- a/src/ov-re-sparse.cc	Tue Aug 04 09:52:53 2009 +0200
+++ b/src/ov-re-sparse.cc	Tue Aug 04 09:55:38 2009 +0200
@@ -876,7 +876,7 @@
 SPARSE_MAPPER (gamma, SparseMatrix::dmapper, xgamma)
 CD_SPARSE_MAPPER (lgamma, xlgamma, xlgamma, 0.0, octave_Inf)
 SPARSE_MAPPER (abs, SparseMatrix::dmapper, ::fabs)
-SPARSE_MAPPER (acos, SparseMatrix::dmapper, ::acos)
+CD_SPARSE_MAPPER (acos, ::acos, ::acos, -1.0, 1.0)
 CD_SPARSE_MAPPER (acosh, ::acosh, ::acosh, 1.0, octave_Inf)
 SPARSE_MAPPER (angle, SparseMatrix::dmapper, ::arg)
 SPARSE_MAPPER (arg, SparseMatrix::dmapper, ::arg)
diff -r bf90777b58c9 -r 3df527f71cee src/ov-scalar.cc
--- a/src/ov-scalar.cc	Tue Aug 04 09:52:53 2009 +0200
+++ b/src/ov-scalar.cc	Tue Aug 04 09:55:38 2009 +0200
@@ -294,7 +294,7 @@
 SCALAR_MAPPER (gamma, xgamma)
 CD_SCALAR_MAPPER (lgamma, xlgamma, xlgamma, 0.0, octave_Inf)
 SCALAR_MAPPER (abs, ::fabs)
-SCALAR_MAPPER (acos, ::acos)
+CD_SCALAR_MAPPER (acos, ::acos, ::acos, -1.0, 1.0)
 CD_SCALAR_MAPPER (acosh, ::acosh, ::acosh, 1.0, octave_Inf)
 SCALAR_MAPPER (angle, ::arg)
 SCALAR_MAPPER (arg, ::arg)