pike.git / src / bignum.c

version» Context lines:

pike.git/src/bignum.c:14:   #include "object.h"   #include "svalue.h"   #include "pike_error.h"      #define sp Pike_sp      PMOD_EXPORT struct svalue auto_bignum_program = SVALUE_INIT_FREE;      PMOD_EXPORT struct program *get_auto_bignum_program(void)   { -  return program_from_function(&auto_bignum_program); +  return program_from_svalue(&auto_bignum_program);   }      PMOD_EXPORT struct program *get_auto_bignum_program_or_zero(void)   {    if (auto_bignum_program.type == PIKE_T_FREE)    return 0; -  return program_from_function(&auto_bignum_program); +  return program_from_svalue(&auto_bignum_program);   }      void exit_auto_bignum(void)   {    free_svalue(&auto_bignum_program);    mark_free_svalue (&auto_bignum_program);   }      PMOD_EXPORT void convert_stack_top_to_bignum(void)   {