Fix spurious `throw from within critical section' errors
authorNeil Jerram <neil@ossau.uklinux.net>
Tue, 10 Mar 2009 23:55:31 +0000 (23:55 +0000)
committerNeil Jerram <neil@ossau.uklinux.net>
Wed, 30 Sep 2009 20:44:02 +0000 (21:44 +0100)
commit87f30eda98b9c84807d54af6c76b6195c5cbd009
tree68c075350ed8489ac6230115359c6a31db95474f
parent09d978f3f81d7ae43ba952de8dc568f54f5f80b6
Fix spurious `throw from within critical section' errors

The crux of this problem was that the thread doing a throw, and so
checking scm_i_critical_section_level, was different from the thread
that was in a critical section.

* libguile/async.h (scm_i_critical_section_level): Removed, replaced
  by per-thread critical_section_level.
  (SCM_CRITICAL_SECTION_START, SCM_CRITICAL_SECTION_END): Use
  per-thread critical_section_level.

* libguile/continuations.c (scm_dynthrow): Check per-thread
  critical_section_level.

* libguile/threads.c (guilify_self_1): Init per-thread
  critical_section_level.
  (scm_i_critical_section_level): Removed.

* libguile/threads.h (scm_i_thread): New critical_section_level field.

* libguile/throw.c (scm_ithrow): Check per-thread critical_section_level.
libguile/async.h
libguile/continuations.c
libguile/threads.c
libguile/threads.h
libguile/throw.c