Exemple #1
0
inline cell factor_vm::allot_integer(fixnum x)
{
	if(x < fixnum_min || x > fixnum_max)
		return tag<bignum>(fixnum_to_bignum(x));
	else
		return tag_fixnum(x);
}
Exemple #2
0
/* Allocates memory */
inline cell factor_vm::from_signed_cell(fixnum x) {
  if (x < fixnum_min || x > fixnum_max)
    return tag<bignum>(fixnum_to_bignum(x));
  else
    return tag_fixnum(x);
}