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

fix coverity 435052 Dereference before null check

Browse source 
https://scan7.coverity.com/reports.htm#v29378/p15116/fileInstanceId=19259832&defectInstanceId=4445114&mergedDefectId=1435052
This commit is contained in:
Fabrizio Fabbri 2017-05-17 21:11:26 +02:00
parent e688ca4058
commit 6c8449b147
No known key found for this signature in database
GPG key ID: 8276EDF3D10E6C35
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/process.d
View file

@ -189,7 +189,7 @@ thread_cleanup(void *aux)
cl_env_ptr env = process->process.env;
/* The following flags will disable all interrupts. */
AO_store_full((AO_t*)&process->process.phase, ECL_PROCESS_EXITING);
ecl_disable_interrupts_env(env);
if (env) ecl_disable_interrupts_env(env);
#ifdef HAVE_SIGPROCMASK
/* ...but we might get stray signals. */
{