pike.git / src / modules / _Debug / debug.cmod

version» Context lines:

pike.git/src/modules/_Debug/debug.cmod:6:      #include "global.h"   #include "module.h"   #include "pike_error.h"   #include "interpret.h"   #include "pike_embed.h"   #include "module_support.h"   #include "pike_security.h"   #include "builtin_functions.h"    - #define DEFAULT_CMOD_STORAGE -  +    DECLARATIONS      /*! @decl int(0..) map_all_objects(function(object:void) cb)    *! @belongs Debug    *!    *! Call cb for all objects that currently exist. The callback will    *! not be called with destructed objects as it's argument.    *!    *! Objects might be missed if @[cb] creates new objects or destroys    *! old ones.
pike.git/src/modules/_Debug/debug.cmod:53:    o = next;    }    RETURN total;   }      #ifdef PIKE_DEBUG   /* This function is for debugging *ONLY*    * do not document please. /Hubbe    */   PIKEFUN int leak(array|mapping|multiset|object|function|program|string|type val) +  export;   {    INT32 i;       if(!REFCOUNTED_TYPE(TYPEOF(*val)))    SIMPLE_BAD_ARG_ERROR("leak", 1,    "array|mapping|multiset|object|"    "function|program|string|type");       add_ref(val->u.dummy);    i = val->u.refs[0];
pike.git/src/modules/_Debug/debug.cmod:79:    *! Set the run-time debug level.    *!    *! @returns    *! The old debug level will be returned.    *!    *! @note    *! This function is only available if the Pike runtime has been compiled    *! with RTL debug.    */   PIKEFUN int(0..) debug(int(0..) d) +  export;   {    pop_n_elems(args);    push_int(d_flag);    d_flag = d;   }      /*! @decl int(0..) optimizer_debug(int(0..) level)    *! @belongs Debug    *!    *! Set the optimizer debug level.    *!    *! @returns    *! The old optimizer debug level will be returned.    *!    *! @note    *! This function is only available if the Pike runtime has been compiled    *! with RTL debug.    */   PIKEFUN int(0..) optimizer_debug(int(0..) l) -  +  export;   {    pop_n_elems(args);    push_int(l_flag);    l_flag = l;   }      /*! @decl int(0..) assembler_debug(int(0..) level)    *! @belongs Debug    *!    *! Set the assembler debug level.    *!    *! @returns    *! The old assembler debug level will be returned.    *!    *! @note    *! This function is only available if the Pike runtime has been compiled    *! with RTL debug.    */   PIKEFUN int(0..) assembler_debug(int(0..) l) -  +  export;   {    pop_n_elems(args);    push_int(a_flag);    a_flag = l;   }      /*! @decl void dump_program_tables(program p, int(0..)|void indent)    *! @belongs Debug    *!    *! Dumps the internal tables for the program @[p] on stderr.
pike.git/src/modules/_Debug/debug.cmod:155:    *! Set the compiler trace level.    *!    *! @returns    *! The old compiler trace level will be returned.    *!    *! @note    *! This function is only available if the Pike runtime has been compiled    *! with RTL debug.    */   PIKEFUN int(0..) compiler_trace(int(0..) yyd) +  export;   {    extern int yydebug;    pop_n_elems(args);    push_int(yydebug);    yydebug = yyd;   }      #endif /* YYDEBUG */      #endif /* PIKE_DEBUG */