mach-info.cc File Reference

#include "f77-fcn.h"
#include "lo-error.h"
#include "mach-info.h"
#include "singleton-cleanup.h"

Include dependency graph for mach-info.cc:

Go to the source code of this file.

Classes
union	equiv
struct	float_params
Defines
#define	INIT_FLT_PAR(fp, fmt, sm1, sm2, lrg1, lrg2, rt1, rt2, dv1, dv2)
Functions
static int	equiv_compare (const equiv *std, const equiv *v, int len)
double	F77_FUNC (d1mach, D1MACH)(const octave_idx_type &)
static oct_mach_info::float_format	get_float_format (void)
static bool	ten_little_endians (void)

---

Define Documentation

#define INIT_FLT_PAR	(		fp,
			fmt,
			sm1,
			sm2,
			lrg1,
			lrg2,
			rt1,
			rt2,
			dv1,
			dv2
	)

Value:

do \
    { \
      fp.fp_fmt = (fmt); \
      fp.fp_par[0].i[0] = (sm1);  fp.fp_par[0].i[1] = (sm2); \
      fp.fp_par[1].i[0] = (lrg1); fp.fp_par[1].i[1] = (lrg2); \
      fp.fp_par[2].i[0] = (rt1);  fp.fp_par[2].i[1] = (rt2); \
      fp.fp_par[3].i[0] = (dv1);  fp.fp_par[3].i[1] = (dv2); \
    } \
  while (0)

Definition at line 52 of file mach-info.cc.

Referenced by get_float_format().

---

Function Documentation

static int equiv_compare	(	const equiv *	std,
		const equiv *	v,
		int	len
	)			[static]

Definition at line 64 of file mach-info.cc.

Referenced by get_float_format().

double F77_FUNC	(	d1mach	,
		D1MACH
	)			const

static oct_mach_info::float_format get_float_format

(

void

)

[static]

Definition at line 74 of file mach-info.cc.

References equiv::d, d1mach(), equiv_compare(), F77_FUNC(), oct_mach_info::flt_fmt_ieee_big_endian, oct_mach_info::flt_fmt_ieee_little_endian, oct_mach_info::flt_fmt_unknown, oct_mach_info::flt_fmt_vax_d, oct_mach_info::flt_fmt_vax_g, float_params::fp_fmt, and INIT_FLT_PAR.

static bool ten_little_endians

(

void

)

[static]

Definition at line 142 of file mach-info.cc.