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

don't check for future or foreign work in atomic mode

Browse Source
This commit is contained in:
Matthew Flatt 2011-09-20 16:09:14 -06:00
parent 27be90e7b7
commit 6e6e30a73a
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -4118,10 +4118,12 @@ void scheme_thread_block(float sleep_time)
check_scheduled_kills();
#ifdef MZ_USE_FUTURES
scheme_check_future_work();
if (!do_atomic)
scheme_check_future_work();
#endif
#if defined(MZ_USE_MZRT) && !defined(DONT_USE_FOREIGN)
scheme_check_foreign_work();
if (!do_atomic)
scheme_check_foreign_work();
#endif
if (!do_atomic && (sleep_end >= 0.0)) {