Math-MPC

 view release on metacpan or  search on metacpan

MPC.xs  view on Meta::CPAN

	SV *	q
	unsigned int	round
CODE:
  RETVAL = _mpfr_set_NV (aTHX_ p, q, round);
OUTPUT:  RETVAL

void
Rmpc_set_prec (p, prec)
	mpc_t *	p
	SV *	prec
        PPCODE:
        Rmpc_set_prec(aTHX_ p, prec);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_set_re_prec (p, prec)
	mpc_t *	p
	SV *	prec
        PPCODE:
        Rmpc_set_re_prec(aTHX_ p, prec);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_set_im_prec (p, prec)
	mpc_t *	p
	SV *	prec
        PPCODE:
        Rmpc_set_im_prec(aTHX_ p, prec);
        XSRETURN_EMPTY; /* return empty stack */

SV *
Rmpc_get_prec (x)
	mpc_t *	x
CODE:
  RETVAL = Rmpc_get_prec (aTHX_ x);
OUTPUT:  RETVAL

void
Rmpc_get_prec2 (x)
	mpc_t *	x
        PPCODE:
        PL_markstack_ptr++;
        Rmpc_get_prec2(aTHX_ x);
        return;

SV *
Rmpc_get_im_prec (x)
	mpc_t *	x
CODE:
  RETVAL = Rmpc_get_im_prec (aTHX_ x);
OUTPUT:  RETVAL

MPC.xs  view on Meta::CPAN

Rmpc_get_re_prec (x)
	mpc_t *	x
CODE:
  RETVAL = Rmpc_get_re_prec (aTHX_ x);
OUTPUT:  RETVAL

void
RMPC_RE (fr, x)
	mpfr_t *	fr
	mpc_t *	x
        PPCODE:
        RMPC_RE(fr, x);
        XSRETURN_EMPTY; /* return empty stack */

void
RMPC_IM (fr, x)
	mpfr_t *	fr
	mpc_t *	x
        PPCODE:
        RMPC_IM(fr, x);
        XSRETURN_EMPTY; /* return empty stack */

SV *
RMPC_INEX_RE (x)
	SV *	x
CODE:
  RETVAL = RMPC_INEX_RE (aTHX_ x);
OUTPUT:  RETVAL

SV *
RMPC_INEX_IM (x)
	SV *	x
CODE:
  RETVAL = RMPC_INEX_IM (aTHX_ x);
OUTPUT:  RETVAL

void
DESTROY (p)
	mpc_t *	p
        PPCODE:
        DESTROY(aTHX_ p);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_clear (p)
	mpc_t *	p
        PPCODE:
        Rmpc_clear(aTHX_ p);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_clear_mpc (p)
	mpc_t *	p
        PPCODE:
        Rmpc_clear_mpc(p);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_clear_ptr (p)
	mpc_t *	p
        PPCODE:
        Rmpc_clear_ptr(aTHX_ p);
        XSRETURN_EMPTY; /* return empty stack */

SV *
Rmpc_init2 (prec)
	SV *	prec
CODE:
  RETVAL = Rmpc_init2 (aTHX_ prec);
OUTPUT:  RETVAL

MPC.xs  view on Meta::CPAN

	SV *	third
CODE:
  RETVAL = overload_sqrt (aTHX_ p, second, third);
OUTPUT:  RETVAL

void
overload_copy (p, second, third)
	mpc_t *	p
	SV *	second
	SV *	third
        PPCODE:
        PL_markstack_ptr++;
        overload_copy(aTHX_ p, second, third);
        return;

SV *
overload_abs (p, second, third)
	mpc_t *	p
	SV *	second
	SV *	third
CODE:

MPC.xs  view on Meta::CPAN

CODE:
  RETVAL = overload_cos (aTHX_ p, second, third);
OUTPUT:  RETVAL

void
_get_r_string (p, base, n_digits, round)
	mpc_t *	p
	SV *	base
	SV *	n_digits
	SV *	round
        PPCODE:
        PL_markstack_ptr++;
        _get_r_string(aTHX_ p, base, n_digits, round);
        return;

void
_get_i_string (p, base, n_digits, round)
	mpc_t *	p
	SV *	base
	SV *	n_digits
	SV *	round
        PPCODE:
        PL_markstack_ptr++;
        _get_i_string(aTHX_ p, base, n_digits, round);
        return;

SV *
_itsa (a)
	SV *	a
CODE:
  RETVAL = _itsa (aTHX_ a);
OUTPUT:  RETVAL

MPC.xs  view on Meta::CPAN

	SV *	str
	SV *	base
	SV *	round
CODE:
  RETVAL = Rmpc_strtoc (aTHX_ rop, str, base, round);
OUTPUT:  RETVAL

void
Rmpc_set_nan (a)
	mpc_t *	a
        PPCODE:
        Rmpc_set_nan(a);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_swap (a, b)
	mpc_t *	a
	mpc_t *	b
        PPCODE:
        Rmpc_swap(a, b);
        XSRETURN_EMPTY; /* return empty stack */

SV *
overload_atan2 (p, q, third)
	mpc_t *	p
	mpc_t *	q
	SV *	third
CODE:
  RETVAL = overload_atan2 (aTHX_ p, q, third);

MPC.xs  view on Meta::CPAN

	SV *	rnd_cos
CODE:
  RETVAL = Rmpc_sin_cos (aTHX_ rop_sin, rop_cos, op, rnd_sin, rnd_cos);
OUTPUT:  RETVAL

void
Rmpc_get_dc (crop, op, round)
	SV *	crop
	mpc_t *	op
	SV *	round
        PPCODE:
        Rmpc_get_dc(aTHX_ crop, op, round);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_get_ldc (crop, op, round)
	SV *	crop
	mpc_t *	op
	SV *	round
        PPCODE:
        Rmpc_get_ldc(aTHX_ crop, op, round);
        XSRETURN_EMPTY; /* return empty stack */

SV *
Rmpc_set_dc (op, crop, round)
	mpc_t *	op
	SV *	crop
	SV *	round
CODE:
  RETVAL = Rmpc_set_dc (aTHX_ op, crop, round);

MPC.xs  view on Meta::CPAN

	SV *	round
CODE:
  RETVAL = Rmpc_set_ldc (aTHX_ op, crop, round);
OUTPUT:  RETVAL

void
Rmpc_get_DC (crop, op, round)
	SV *	crop
	mpc_t *	op
	SV *	round
        PPCODE:
        Rmpc_get_DC(aTHX_ crop, op, round);
        XSRETURN_EMPTY; /* return empty stack */

void
Rmpc_get_LDC (crop, op, round)
	SV *	crop
	mpc_t *	op
	SV *	round
        PPCODE:
        Rmpc_get_LDC(aTHX_ crop, op, round);
        XSRETURN_EMPTY; /* return empty stack */

SV *
Rmpc_set_DC (op, crop, round)
	mpc_t *	op
	SV *	crop
	SV *	round
CODE:
  RETVAL = Rmpc_set_DC (aTHX_ op, crop, round);

MPC.xs  view on Meta::CPAN

_get_nv_precision ()


int
nok_pokflag ()


void
clear_nok_pok ()

        PPCODE:
        clear_nok_pok();
        XSRETURN_EMPTY; /* return empty stack */

void
set_nok_pok (x)
	int	x
        PPCODE:
        set_nok_pok(x);
        XSRETURN_EMPTY; /* return empty stack */

int
_SvNOK (in)
	SV *	in
CODE:
  RETVAL = _SvNOK (aTHX_ in);
OUTPUT:  RETVAL