Mercurial > octave-nkf
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 Sat May 02 07:20:35 2009 -0700 +++ b/doc/interpreter/contributors.in Mon May 04 15:11:31 2009 -0400 @@ -26,6 +26,7 @@ Vincent Cautaerts Clinton Chee Albert Chin-A-Young +Carsten Clark J. D. Cole Martin Costabel Michael Creel
--- a/liboctave/ChangeLog Sat May 02 07:20:35 2009 -0700 +++ b/liboctave/ChangeLog Mon May 04 15:11:31 2009 -0400 @@ -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 Sat May 02 07:20:35 2009 -0700 +++ b/liboctave/Quad.cc Mon May 04 15:11:31 2009 -0400 @@ -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;