1.0.12.33: Have foreign.test.sh create .so files under the test directory

[sbcl.git] / src / runtime / thread.c

diff --git a/src/runtime/thread.c b/src/runtime/thread.c
index 9044dfd..d38fd72 100644 (file)
--- a/src/runtime/thread.c
+++ b/src/runtime/thread.c
@@ -729,3 +729,13 @@ void gc_start_the_world()
     FSHOW_SIGNAL((stderr,"/gc_start_the_world:end\n"));
 }
 #endif
+
+int
+thread_yield()
+{
+#ifdef LISP_FEATURE_SB_THREAD
+    return sched_yield();
+#else
+    return 0;
+#endif
+}