Branch: Tag:

2000-02-15

2000-02-15 02:37:58 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Minor change.

Rev: src/threads.c:1.111

1:   #include "global.h" - RCSID("$Id: threads.c,v 1.110 2000/02/10 18:03:29 hubbe Exp $"); + RCSID("$Id: threads.c,v 1.111 2000/02/15 02:37:58 grubba Exp $");      int num_threads = 1;   int threads_disabled = 0;
196:      #define THIS_THREAD ((struct thread_state *)fp->current_storage)    - struct object *thread_id; + struct object *thread_id = NULL;   static struct callback *threads_evaluator_callback=0;   int thread_id_result_variable;   
1288:      void th_cleanup(void)   { +  if(thread_id) +  { +  destruct(thread_id); +  free_object(thread_id); +  thread_id=0; +  } +     if(mutex_key)    {    free_program(mutex_key);
1305:    free_program(thread_id_prog);    thread_id_prog=0;    } -  -  if(thread_id) -  { -  destruct(thread_id); -  free_object(thread_id); -  thread_id=0; +    } - } +       /* Thread farm code by Per    *