Mercurial > hg > octave-shane
changeset 9169:b1e82cc8a9f3
eliminate broken special case for copying floats on Sun systems
author | Carsten Clark <tantumquantum+gnuoctave@gmail.com> |
---|---|
date | Mon, 04 May 2009 15:11:31 -0400 |
parents | 742cf6388a8f |
children | 81a755db4db4 |
files | doc/interpreter/contributors.in liboctave/ChangeLog liboctave/Quad.cc |
diffstat | 3 files changed, 6 insertions(+), 13 deletions(-) [+] |
line wrap: on
line diff
--- a/doc/interpreter/contributors.in +++ b/doc/interpreter/contributors.in @@ -26,6 +26,7 @@ Vincent Cautaerts Clinton Chee Albert Chin-A-Young +Carsten Clark J. D. Cole Martin Costabel Michael Creel
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -1,3 +1,7 @@ +2009-05-04 Carsten Clark <tantumquantum+gnuoctave@gmail.com> + + * Quad.cc (float_user_function): Remove Sun/GCC special case. + 2009-04-16 Jaroslav Hajek <highegg@gmail.com> * idx-vector.cc (idx_vector::idx_range_rep::idx_range_rep (const
--- a/liboctave/Quad.cc +++ b/liboctave/Quad.cc @@ -106,21 +106,9 @@ { BEGIN_INTERRUPT_WITH_EXCEPTIONS; -#if defined (sun) && defined (__GNUC__) - float xx = access_float (x); -#else - float xx = *x; -#endif - quad_integration_error = 0; - float xresult = (*float_user_fcn) (xx); - -#if defined (sun) && defined (__GNUC__) - assign_float (result, xresult); -#else - *result = xresult; -#endif + *result = (*float_user_fcn) (*x); if (quad_integration_error) ierr = -1;