mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-16 16:50:21 +02:00
* modules.c (scm_sym2var): Don't compare SCM values with ==.
This commit is contained in:
parent
1d1559ce6d
commit
bcbd25b74f
2 changed files with 5 additions and 1 deletions
|
@ -435,7 +435,7 @@ scm_sym2var (SCM sym, SCM proc, SCM definep)
|
|||
{
|
||||
SCM handle;
|
||||
|
||||
if (definep == SCM_BOOL_F)
|
||||
if (SCM_FALSEP (definep))
|
||||
var = scm_hashq_ref (scm_pre_modules_obarray, sym, SCM_BOOL_F);
|
||||
else
|
||||
{
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue