summaryrefslogtreecommitdiff
path: root/libguile/modules.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2002-07-21 21:18:27 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2002-07-21 21:18:27 +0000
commitbcbd25b74ff741a72df5e56385744dabc03d9575 (patch)
treeb862edb7db3c443d066f23eb8fecfc12c68949d3 /libguile/modules.c
parent1d1559ce6dc6190cb46d00c479a12ec51af12011 (diff)
downloadguile-bcbd25b74ff741a72df5e56385744dabc03d9575.tar.gz
* modules.c (scm_sym2var): Don't compare SCM values with ==.
Diffstat (limited to 'libguile/modules.c')
-rw-r--r--libguile/modules.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/modules.c b/libguile/modules.c
index 9c6d72621..d77aab912 100644
--- a/libguile/modules.c
+++ b/libguile/modules.c
@@ -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
{