pike.git / src / builtin_functions.c

version» Context lines:

pike.git/src/builtin_functions.c:7721:    *! @seealso    *! @[_next()], @[_prev()]    */   PMOD_EXPORT void f__refs(INT32 args)   {    INT32 i;       if(!args)    SIMPLE_TOO_FEW_ARGS_ERROR("_refs", 1);    -  if(TYPEOF(Pike_sp[-args]) > MAX_REF_TYPE) +  if(!REFCOUNTED_TYPE(TYPEOF(Pike_sp[-args])))    SIMPLE_BAD_ARG_ERROR("refs", 1,    "array|mapping|multiset|object|"    "function|program|string");       i=Pike_sp[-args].u.refs[0];    pop_n_elems(args);    push_int(i);   }      #ifdef PIKE_DEBUG   /* This function is for debugging *ONLY*    * do not document please. /Hubbe    */   PMOD_EXPORT void f__leak(INT32 args)   {    INT32 i;       if(!args)    SIMPLE_TOO_FEW_ARGS_ERROR("_leak", 1);    -  if(TYPEOF(Pike_sp[-args]) > MAX_REF_TYPE) +  if(!REFCOUNTED_TYPE(TYPEOF(Pike_sp[-args])))    SIMPLE_BAD_ARG_ERROR("_leak", 1,    "array|mapping|multiset|object|"    "function|program|string");       add_ref(Pike_sp[-args].u.dummy);    i=Pike_sp[-args].u.refs[0];    pop_n_elems(args);    push_int(i);   }   #endif
pike.git/src/builtin_functions.c:8429: Inside #if defined(PIKE_DEBUG)
   *! @note    *! This function only exists if the Pike runtime has been compiled    *! with RTL debug.    */   PMOD_EXPORT void f__gc_set_watch(INT32 args)   {    ASSERT_SECURITY_ROOT("_gc_set_watch");       if (args < 1)    SIMPLE_TOO_FEW_ARGS_ERROR("_gc_set_watch", 1); -  if (TYPEOF(Pike_sp[-args]) > MAX_REF_TYPE) +  if (!REFCOUNTED_TYPE(TYPEOF(Pike_sp[-args])))    SIMPLE_BAD_ARG_ERROR("_gc_set_watch", 1, "reference type");    gc_watch(Pike_sp[-args].u.refs);    pop_n_elems(args);   }      /*! @decl void dump_backlog()    *! @belongs Debug    *!    *! Dumps the 1024 latest executed opcodes, along with the source    *! code lines, to standard error. The backlog is only collected on