mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-04-23 02:00:53 -07:00
Code Issues Projects Releases Packages Wiki Activity

When giving up a lock there is no need to disable interrupts.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2012-03-19 23:59:16 +01:00
parent 445431daa4
commit a444e8d290
1 changed files with 0 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/threads/mutex.d
View file

@ -109,12 +109,10 @@ mp_giveup_lock(cl_object lock)
unlikely_if (lock->lock.owner != own_process) {
FEerror_not_owned(lock);
}
ecl_disable_interrupts_env(env);
if (--lock->lock.counter == 0) {
lock->lock.owner = Cnil;
ecl_wakeup_waiters(lock, ECL_WAKEUP_ONE);
}
ecl_enable_interrupts_env(env);
ecl_return1(env, Ct);
}