In MAKE-THREAD, use WITH-SYSTEM-MUTEX for locking *MAKE-THREAD-LOCK*
Otherwise MAKE-THREAD could be interrupted after having
locked *MAKE-THREAD-LOCK*. If the interrupting code also called
MAKE-THREAD, a recursive lock attempt for *MAKE-THREAD-LOCK* would
The problem could be easily triggered by
(MAKE-TIMER ... :THREAD <T or a thread>)
Also move let bindings of SETUP-SEM, REAL-FUNCTION, ARGUMENTS and
INITIAL-FUNCTION and the NOT *GC-INHIBIT* assertion out of the
Tests have been added in threads.pure.lisp and timer.impure.lisp.
Sign up for the SourceForge newsletter:
You seem to have CSS turned off.
Please don't fill out this field.