pike.git / src / svalue.c

version» Context lines:

pike.git/src/svalue.c:34: Inside #if defined(PIKE_DEBUG)
  PMOD_EXPORT const char msg_type_error[] =    "Type error: %d\n";   PMOD_EXPORT const char msg_assign_svalue_error[] =    "assign_svalue_no_free(): to and from are both %p.\n";   PMOD_EXPORT const char msg_sval_obj_wo_refs[] =    "Svalue to object without references.\n";   PMOD_EXPORT const char msg_ssval_obj_wo_refs[] =    "(short) Svalue to object without references.\n";   #endif    + PMOD_EXPORT void check_destructed(struct svalue *s) + { +  if(IS_DESTRUCTED(s)) { +  free_object(s->u.object); +  SET_SVAL(*s, PIKE_T_INT, +  NUMBER_DESTRUCTED, +  integer, 0); +  } + } +  +    /*    * This routine frees a short svalue given a pointer to it and    * its type.    */      PMOD_EXPORT void really_free_short_svalue_ptr(void **s, TYPE_T type)   {    union anything tmp;    tmp.ptr = *s;    *s = NULL; /* Prevent cyclic calls */