mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-18 07:12:26 -08:00
Code Issues Projects Releases Packages Wiki Activity

src/c/threads.d: we cannot create locks until the environment is set up

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-10-01 11:36:34 +02:00
parent 2bee22b015
commit 5618cc648b
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/threads.d
View file

@ -860,7 +860,6 @@ init_threads(cl_env_ptr env)
cl_object process;
pthread_t main_thread;
cl_core.global_lock = ecl_make_lock(@'si::package-lock', 0);
cl_core.processes = OBJNULL;
/* We have to set the environment before any allocation takes place,
@ -898,5 +897,6 @@ init_threads(cl_env_ptr env)
env->own_process = process;
cl_core.global_lock = ecl_make_lock(@'si::package-lock', 0);
cl_core.processes = ecl_list1(process);
}