[MIT-Scheme-devel] recursive with-thread-mutex-locked

[Matt Birkholz]

> From: Taylor R Campbell <address@hidden>
> Date: Thu, 13 Nov 2014 22:41:47 +0000
> 
> Does anyone rely on recursion in WITH-THREAD-MUTEX-LOCKED?  I would
> like to prohibit recursive thread mutex locks altogether,

Sounds good to me.

> and prohibit the use of THREAD-MUTEX-OWNER except as a diagnostic
> and debugging feature.

How?  If it is not exported to (), I will need to type

    (define thread-mutex-owner
            (access thread-mutex-owner (->environment '(runtime thread))))

in my debugging session?

Can we "fix" ACCESS to do the coercion?  I'd rather type

    (define thread-mutex-owner (access thread-mutex-owner '(runtime thread)))