Branch: Tag:

2000-11-06

2000-11-06 16:46:42 by Martin Stjernholm <mast@lysator.liu.se>

Better prototype for f_thread_local_set.

Rev: src/threads.c:1.142

1:   #include "global.h" - RCSID("$Id: threads.c,v 1.141 2000/11/01 23:39:08 grubba Exp $"); + RCSID("$Id: threads.c,v 1.142 2000/11/06 16:46:42 mast Exp $");      PMOD_EXPORT int num_threads = 1;   PMOD_EXPORT int threads_disabled = 0;
1412:       START_NEW_PROGRAM_ID(THREAD_LOCAL);    ADD_STORAGE(struct thread_local); -  /* function(:mixed) */ +     ADD_FUNCTION("get",f_thread_local_get,tFunc(tNone,tMix),0); -  /* function(mixed:mixed) */ -  ADD_FUNCTION("set",f_thread_local_set,tFunc(tMix,tMix),0); +  ADD_FUNCTION("set",f_thread_local_set,tFunc(tSetVar(1,tMix),tVar(1)),0);    thread_local_prog=Pike_compiler->new_program;    add_ref(thread_local_prog);    end_class("thread_local", 0);    if(!thread_local_prog)    fatal("Failed to initialize thread_local program!\n"); -  /* function(:object(thread_local)) */ +     ADD_EFUN("thread_local",f_thread_local,    tFunc(tNone,tObjIs_THREAD_LOCAL),    OPT_SIDE_EFFECT);