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

Some comments on thread_entry_point().

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2010-01-21 15:56:44 +01:00
parent 84f90aa585
commit 3ee4c8ea15
1 changed files with 11 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/c/threads.d
View file

@ -143,6 +143,17 @@ thread_entry_point(void *arg)
cl_object process = (cl_object)arg;
cl_env_ptr env = process->process.env;
/*
* Upon entering this routine
* process.env = our environment for lisp
* process.active = 2
* signals are disabled in the environment
*
* Since process.active = 2, this process will not recevie
* signals that originate from other processes. Furthermore,
* we expect not to get any other interrupts (SIGSEGV, SIGFPE)
* if we do things right.
*/
/* 1) Setup the environment for the execution of the thread */
ecl_set_process_env(env = process->process.env);
#ifndef ECL_WINDOWS_THREADS