summaryrefslogtreecommitdiff
path: root/libguile/async.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/async.c')
-rw-r--r--libguile/async.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/libguile/async.c b/libguile/async.c
index af6f65cf2..d2478fd65 100644
--- a/libguile/async.c
+++ b/libguile/async.c
@@ -260,7 +260,13 @@ scm_async_click ()
void
scm_switch ()
-{}
+{
+#if 0 /* Thread switching code should probably reside here, but the
+ async switching code doesn't seem to work, so it's put in the
+ SCM_ASYNC_TICK macro instead. /mdj */
+ SCM_THREAD_SWITCHING_CODE;
+#endif
+}