mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-16 14:21:48 -08:00
Code Issues Projects Releases Packages Wiki Activity

Move packages to read/write locks

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2010-10-24 17:52:53 +02:00
parent 1e3eb5b62a
commit c86c8bd5c0
7 changed files with 94 additions and 50 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -654,6 +654,6 @@ init_threads(cl_env_ptr env)
cl_core.global_lock = ecl_make_lock(@'mp::global-lock', 1);
cl_core.error_lock = ecl_make_lock(@'mp::error-lock', 1);
cl_core.package_lock = ecl_make_lock(@'mp::package-lock', 1);
cl_core.package_lock = ecl_make_rwlock(@'mp::package-lock');
cl_core.processes = ecl_list1(process);
}