This adds most of the thread features visible to emacs lisp.

I roughly followed the Bordeaux threads API:

http://trac.common-lisp.net/bordeaux-threads/wiki/ApiDocumentation

... but not identically.  In particular I chose not to implement
interrupt-thread or destroy-thread, but instead a thread-signalling
approach.

I'm still undecided about *default-special-bindings* (which I did not
implement).  I think it would be more emacs-like to capture the let
bindings at make-thread time, but IIRC Stefan didn't like this idea
the first time around.

There are one or two semantics issues pointed out in the patch where I
could use some advice.

1 files changed, 3 insertions, 0 deletions

diff --git a/src/alloc.c b/src/alloc.c
index dfae2d1ef67..69742a325d1 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -3102,6 +3102,9 @@ sweep_vectors (void)
               ptrdiff_t nbytes = PSEUDOVECTOR_NBYTES (vector);
               ptrdiff_t total_bytes = nbytes;
 
+              if (PSEUDOVECTOR_TYPEP (&vector->header, PVEC_THREAD))
+                finalize_one_thread ((struct thread_state *) vector);
+
               next = ADVANCE (vector, nbytes);
 
               /* While NEXT is not marked, try to coalesce with VECTOR,