23 #if defined (HAVE_CONFIG_H) 46 #define INIT_FLT_PAR(fp, fmt, sm1, sm2, lrg1, lrg2, rt1, rt2, dv1, dv2) \ 50 fp.fp_par[0].i[0] = (sm1); fp.fp_par[0].i[1] = (sm2); \ 51 fp.fp_par[1].i[0] = (lrg1); fp.fp_par[1].i[1] = (lrg2); \ 52 fp.fp_par[2].i[0] = (rt1); fp.fp_par[2].i[1] = (rt2); \ 53 fp.fp_par[3].i[0] = (dv1); fp.fp_par[3].i[1] = (dv2); \ 60 for (
i = 0;
i < len;
i++)
123 while (fp[++
i].fp_fmt != 0);
136 char c[
sizeof (long)];
141 return (
u.c[sizeof (
long) - 1] == 1);
double F77_FUNC(d1mach, D1MACH) const
double precision function d1mach(i)
static int equiv_compare(const equiv *std, const equiv *v, int len)
nd example oindent opens the file binary numeric values will be read assuming they are stored in IEEE format with the least significant bit and then converted to the native representation Opening a file that is already open simply opens it again and returns a separate file id It is not an error to open a file several though writing to the same file through several different file ids may produce unexpected results The possible values of text mode reading and writing automatically converts linefeeds to the appropriate line end character for the you may append a you must also open the file in binary mode The parameter conversions are currently only supported for and permissions will be set to and then everything is written in a single operation This is very efficient and improves performance c
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 const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE * d
int octave_get_float_format(void)
octave_f77_int_type F77_INT
int octave_is_big_endian(void)
#define INIT_FLT_PAR(fp, fmt, sm1, sm2, lrg1, lrg2, rt1, rt2, dv1, dv2)