mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-21 12:10:26 +02:00
Code Activity

(core_environments_unobserve): Use if/else rather

Browse source 
than ?: for "SET" bits, avoiding complaints from AIX xlc compiler
about them not being rvalues.  Reported by Mike Gran.
This commit is contained in:
Kevin Ryde 2006-07-07 22:21:08 +00:00
parent 0ad95e9ab8
commit 4a0c7b515d
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
libguile/environments.c
View file

@ -687,9 +687,10 @@ core_environments_unobserve (SCM env, SCM observer)
if (scm_is_eq (first, observer))
{
/* Remove the first observer */
handling_weaks
? SCM_SET_CORE_ENVIRONMENT_WEAK_OBSERVERS (env, rest)
: SCM_SET_CORE_ENVIRONMENT_OBSERVERS (env, rest);
if (handling_weaks)
SCM_SET_CORE_ENVIRONMENT_WEAK_OBSERVERS (env, rest);
else
SCM_SET_CORE_ENVIRONMENT_OBSERVERS (env, rest);
return;
}