pike.git / src / builtin.cmod

version» Context lines:

pike.git/src/builtin.cmod:1:   /* -*- c -*-   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: builtin.cmod,v 1.150 2004/03/12 21:56:52 mast Exp $ + || $Id: builtin.cmod,v 1.151 2004/03/17 12:58:41 mast Exp $   */      #include "global.h"   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"   #include "object.h"   #include "program.h"   #include "array.h"   #include "pike_error.h"
pike.git/src/builtin.cmod:413:    gc_trace = level;    }    else {    bad_arg_error("trace", Pike_sp-args, args, 2,    "trace facility identifier", Pike_sp-args+1,    "Bad argument 2 to trace(). Unknown trace facility.");    }    }    else {    old_level = Pike_interpreter.trace_level; -  gc_trace = level; +    #ifdef PIKE_THREADS    if (!all_threads || UNSAFE_IS_ZERO (all_threads))    Pike_interpreter.trace_level = level;    else {    struct thread_state *s;    FOR_EACH_THREAD(s, s->state.trace_level = level);    }   #else    Pike_interpreter.trace_level = level;   #endif