mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

* __scm.h (scm_asyncs_pending_p): Removed.

Browse source 
(SCM_ASYNC_CLICK): Check scm_active_asyncs instead of
scm_asyncs_pending_p.
This commit is contained in:
Marius Vollmer 2002-10-04 13:49:29 +00:00
parent 2d3179db77
commit e3c9bec302
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/__scm.h
View file

@ -406,11 +406,9 @@ typedef long SCM_STACKITEM;
#define SCM_THREAD_SWITCHING_CODE
#endif
SCM_API int scm_asyncs_pending_p;
#define SCM_ASYNC_TICK /*fixme* should change names */ \
do { \
if (scm_asyncs_pending_p) \
if (scm_active_asyncs != SCM_EOL) \
scm_async_click (); \
} while (0)