Mercurial > hg > octave-nkf
diff liboctave/Quad.cc @ 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 | eb63fbe60fab |
children | 5be2e6696772 |
line wrap: on
line diff
--- 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;