* Makefile.am (libguile_la_SOURCES): Remove backtrace.c, debug.c,

[bpt/guile.git] / libguile / async.c

diff --git a/libguile/async.c b/libguile/async.c
index f8d979d..d2478fd 100644 (file)
--- a/libguile/async.c
+++ b/libguile/async.c
@@ -85,8 +85,6 @@
  */
 
 
-#define min(A,B) ((A) < (B) ? (A) : (B))
-
 
 unsigned int scm_async_clock = 20;
 static unsigned int scm_async_rate = 20;
@@ -262,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
+}