Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-22 07:09:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

returning thread on thread-start!

Browse source
This commit is contained in:
Alex Shinn 2010-08-26 01:37:53 +09:00
parent ac05d24594
commit 0bfb97851b
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/srfi/18/threads.c
View file

@ -80,7 +80,7 @@ sexp sexp_thread_start (sexp ctx sexp_api_params(self, n), sexp thread) {
} else { /* init queue */ } else { /* init queue */
sexp_global(ctx, SEXP_G_THREADS_BACK) = sexp_global(ctx, SEXP_G_THREADS_FRONT) = cell; sexp_global(ctx, SEXP_G_THREADS_BACK) = sexp_global(ctx, SEXP_G_THREADS_FRONT) = cell;
} }
return SEXP_VOID; return thread;
} }
sexp sexp_thread_terminate (sexp ctx sexp_api_params(self, n), sexp thread) { sexp sexp_thread_terminate (sexp ctx sexp_api_params(self, n), sexp thread) {