pike.git / src / threads.c

version» Context lines:

pike.git/src/threads.c:1:   #include "global.h" - RCSID("$Id: threads.c,v 1.152 2001/02/06 17:12:26 per Exp $"); + RCSID("$Id: threads.c,v 1.153 2001/02/06 17:54:44 grubba Exp $");      PMOD_EXPORT int num_threads = 1;   PMOD_EXPORT int threads_disabled = 0;      #ifdef _REENTRANT   #include "threads.h"   #include "array.h"   #include "mapping.h"   #include "object.h"   #include "pike_macros.h"
pike.git/src/threads.c:1405:    end_class("threads_disabled", 0);    tmp->flags|=PROGRAM_DESTRUCT_IMMEDIATE;    add_global_program("_disable_threads", tmp);    free_program(tmp);    }       START_NEW_PROGRAM_ID(THREAD_LOCAL);    ADD_STORAGE(struct thread_local);    ADD_FUNCTION("get",f_thread_local_get,tFunc(tNone,tMix),0);    ADD_FUNCTION("set",f_thread_local_set,tFunc(tSetvar(1,tMix),tVar(1)),0); -  ADD_FUNCTION("crate",f_thread_local_create, -  tFunc(tNone,tVoid), OPT_SIDE_EFFECT); +  ADD_FUNCTION("create", f_thread_local_create, +  tFunc(tNone,tVoid), ID_STATIC);    thread_local_prog=Pike_compiler->new_program;    add_ref(thread_local_prog);    end_class("thread_local", 0); -  ADD_EFUN("thread_local",f_thread_local, -  tFunc(tNone,tObjIs_THREAD_LOCAL), -  OPT_SIDE_EFFECT); +  ADD_EFUN("thread_local", f_thread_local, +  tFunc(tNone, tObjIs_THREAD_LOCAL), +  OPT_EXTERNAL_DEPEND);    if(!thread_local_prog)    fatal("Failed to initialize thread_local program!\n");       START_NEW_PROGRAM_ID(THREAD_ID);    thread_storage_offset=ADD_STORAGE(struct thread_state);    thread_id_result_variable=simple_add_variable("result","mixed",0);    /* function(:array) */    ADD_FUNCTION("backtrace",f_thread_backtrace,tFunc(tNone,tArray),0);    /* function(:mixed) */    ADD_FUNCTION("wait",f_thread_id_result,tFunc(tNone,tMix),0);