* coop-defs.h (coop_t): Added new "handle" slot.
authorMarius Vollmer <mvo@zagadka.de>
Thu, 3 Oct 2002 22:53:17 +0000 (22:53 +0000)
committerMarius Vollmer <mvo@zagadka.de>
Thu, 3 Oct 2002 22:53:17 +0000 (22:53 +0000)
commit9997213b7d2385970ba90ad69df63460f1d6b962
tree66e2b3cb1e3434e83719ed57f919aa6e2567be5d
parentf7eca35dfe7461fe2a8eb9c6da18a0e921366db5
* coop-defs.h (coop_t): Added new "handle" slot.
* coop-threads.c (all_threads, scm_current_thread,
scm_all_threads, scm_i_thread_root): New.
(scm_threads_init): Add main thread to all_threads.
(scheme_launch_thread): Remove thread from all_threads when it
terminates.
(scm_call_with_new_thread): Initialize handle slot of coop_t
structure and add new thread to all_threads.
(scm_spawn_thread): Likewise.
libguile/coop-defs.h
libguile/coop-threads.c