pike.git / src / bignum.c

version» Context lines:

pike.git/src/bignum.c:17:   {    if(auto_bignum_program.type == T_INT)    {    if(gmp_library_resolving)    fatal("Recursive GMP resolving!\n");       gmp_library_resolving=1;    push_text("Gmp.bignum");    SAFE_APPLY_MASTER("resolv", 1);    -  if(sp[-1].type != T_FUNCTION) +  if(sp[-1].type != T_FUNCTION && sp[-1].type != T_PROGRAM)    Pike_error("Failed to resolv Gmp.mpz!\n");       auto_bignum_program=sp[-1];    sp--;    dmalloc_touch_svalue(sp);    gmp_library_resolving=0;    }   }      PMOD_EXPORT struct program *get_auto_bignum_program(void)
pike.git/src/bignum.c:80:    * it is already loaded into memory.    * /Hubbe    */       if(!gmp_library_loaded ||    gmp_library_resolving ||    !master_object)    return 0; /* not possible */       resolve_auto_bignum_program(); -  return o->prog == program_from_function(&auto_bignum_program); +  return o->prog == program_from_svalue(&auto_bignum_program);   }      PMOD_EXPORT int is_bignum_object_in_svalue(struct svalue *sv)   {    return sv->type == T_OBJECT && is_bignum_object(sv->u.object);   }      PMOD_EXPORT struct object *make_bignum_object(void)   {    convert_stack_top_to_bignum();