pike.git / src / bignum.c

version» Context lines:

pike.git/src/bignum.c:33:      void convert_stack_top_to_bignum(void)   {    resolve_auto_bignum_program();    apply_svalue(&auto_bignum_program, 1);       if(sp[-1].type != T_OBJECT)    error("Gmp.mpz conversion failed.\n");   }    + void convert_stack_top_with_base_to_bignum(void) + { +  resolve_auto_bignum_program(); +  apply_svalue(&auto_bignum_program, 2); +  +  if(sp[-1].type != T_OBJECT) +  error("Gmp.mpz conversion failed.\n"); + } +    int is_bignum_object(struct object *o)   {    resolve_auto_bignum_program();    return o->prog == program_from_function(&auto_bignum_program);   }      int is_bignum_object_in_svalue(struct svalue *sv)   {    return sv->type == T_OBJECT && is_bignum_object(sv->u.object);   }