23 #if ! defined (octave_sun_utils_h)
24 #define octave_sun_utils_h 1
26 #include "octave-config.h"
34 #if defined (__sparc) && defined (__GNUC__)
37 access_double (
double *unaligned_ptr)
39 union d2i {
double d;
int i[2]; };
41 union d2i *
p = (
union d2i *) unaligned_ptr;
51 assign_double (
double *unaligned_ptr,
double value)
53 union d2i {
double d;
int i[2]; };
56 union d2i *v = (
union d2i *) ptr;
57 union d2i *
p = (
union d2i *) unaligned_ptr;
F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T F77_REAL F77_REAL &F77_RET_T F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE * d
=val(i)}if ode{val(i)}occurs in table i
OCTAVE_EXPORT octave_value_list or N dimensional array whose elements are all equal to the IEEE symbol zero divided by nd tex zero divided by nd ifnottex and any operation involving another NaN value(5+NaN).Note that NaN always compares not equal to NaN(NaN!