diff options
| author | Martin Wilke <miwi@FreeBSD.org> | 2006-12-02 00:20:41 +0000 |
|---|---|---|
| committer | Martin Wilke <miwi@FreeBSD.org> | 2006-12-02 00:20:41 +0000 |
| commit | fce28c16a5f4422ccb4816c2719fc0f7f3d928f8 (patch) | |
| tree | 152d613624902f36d00a3a0244cb906ffa4e57e9 /lang/sbcl/files/patch-src_runtime_thread.c | |
| parent | 4debeb3ac0bdd07edbd9214ef78cbcc117fd3c92 (diff) | |
Notes
Diffstat (limited to 'lang/sbcl/files/patch-src_runtime_thread.c')
| -rw-r--r-- | lang/sbcl/files/patch-src_runtime_thread.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/lang/sbcl/files/patch-src_runtime_thread.c b/lang/sbcl/files/patch-src_runtime_thread.c new file mode 100644 index 000000000000..75387fc2d7b3 --- /dev/null +++ b/lang/sbcl/files/patch-src_runtime_thread.c @@ -0,0 +1,13 @@ +--- src/runtime/thread.c Thu Nov 23 15:11:26 2006 +0000 ++++ src/runtime/thread.c Fri Nov 24 01:54:54 2006 +0900 +@@ -350,6 +350,10 @@ create_thread_struct(lispobj initial_fun + int i; + #endif + ++#ifdef CREATE_CLEANUP_THREAD ++ /* Give a chance for cleanup threads to run. */ ++ sched_yield(); ++#endif + /* may as well allocate all the spaces at once: it saves us from + * having to decide what to do if only some of the allocations + * succeed */ |