Re: An addition to the ice-9/threads.scm

[Mikael Djurfeldt <mdj@nada.kth.se>]

mike@olan.com (Michael N. Livshin) writes:

> I think it would be a good idea to add the following to ice-9/threads.scm,
> so that programs that use mutexes to protect things won't break on a Guile
> without thread support:
> 
> ------------------->8 cut 8<----------------------------
> 
> ;; In the case of no threads, define the mutex functions,
> ;; so that cautious programs won't break:
> (if (not (memq 'threads *features*))
>     (begin
>       (define-public (make-mutex) #t)
>       (define-public (lock-mutex m) #t)
>       (define-public (unlock-mutex m) #t)))

A good point.  Actually, I'll go one step further.  I'll remove
arbiters.c from the distribution and make mutecis available also for
non-threaded Guiles.  That way you can use mutecis instead of arbiters
for arbitration in interrupt handlers.

/mdj