From 5e569ca831986626579c78bc6b309e9fead22d6f Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Fri, 30 Jan 1998 21:06:31 +0000 Subject: * async.c, async.h (asyncs_pending): Renamed asyncs_pending --> scm_asyncs_pending and made it global. --- libguile/async.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'libguile/async.c') diff --git a/libguile/async.c b/libguile/async.c index 72f23e2ef..a24dfc7e8 100644 --- a/libguile/async.c +++ b/libguile/async.c @@ -106,8 +106,8 @@ static long scm_tc16_async; static int asyncs_pending SCM_P ((void)); -static int -asyncs_pending () +int +scm_asyncs_pending () { SCM pos; pos = scm_asyncs; @@ -238,7 +238,7 @@ scm_async_click () scm_run_asyncs (scm_asyncs); SCM_DEFER_INTS; - if (asyncs_pending ()) + if (scm_asyncs_pending ()) { SCM_ALLOW_INTS_ONLY; goto tail; -- cgit v1.2.3