suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix timing of `place-break' checks in scheduler

Browse Source 
Otherwise, a place in a `sleep' call could fail to
see the break until waking up.
This commit is contained in:
Matthew Flatt 2011-10-11 17:11:05 -06:00
parent 0993408c19
commit 84b615a005
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/racket/src/thread.c
View File

@ -3829,6 +3829,11 @@ void scheme_set_break_main_target(Scheme_Thread *p)
static void check_ready_break()
{
#if defined(MZ_USE_PLACES)
if (!do_atomic)
scheme_place_check_for_interruption();
#endif
if (delayed_break_ready) {
if (scheme_main_thread) {
delayed_break_ready = 0;
@ -4242,10 +4247,6 @@ void scheme_thread_block(float sleep_time)
if (!do_atomic)
GC_check_master_gc_request();
#endif
#if defined(MZ_USE_PLACES)
if (!do_atomic)
scheme_place_check_for_interruption();
#endif
/* Propagate memory-use information and check for custodian-based
GC triggers due to child place memory use: */