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

(SCM_ASYNC_TICK): Do without the scm_active_asyncs abbrev.

Browse source
This commit is contained in:
Marius Vollmer 2002-10-09 22:45:07 +00:00
parent e292f7aac8
commit be2588b87d
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/__scm.h
View file

@ -408,7 +408,7 @@ typedef long SCM_STACKITEM;
#define SCM_ASYNC_TICK /*fixme* should change names */ \ #define SCM_ASYNC_TICK /*fixme* should change names */ \
do { \ do { \
if (scm_active_asyncs != SCM_EOL) \ if (scm_root->active_asyncs != SCM_EOL) \
scm_async_click (); \ scm_async_click (); \
} while (0) } while (0)