diff options
Diffstat (limited to 'libguile/gh_data.c')
-rw-r--r-- | libguile/gh_data.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/gh_data.c b/libguile/gh_data.c index 5ba9a42aa..b982f6ec0 100644 --- a/libguile/gh_data.c +++ b/libguile/gh_data.c @@ -693,7 +693,7 @@ SCM gh_module_lookup (SCM vec, const char *sname) { SCM sym = gh_symbol2scm (sname); - if (SCM_TRUE_P (scm_symbol_bound_p (vec, sym))) + if (SCM_EQ_P (scm_symbol_bound_p (vec, sym), SCM_BOOL_T)) return scm_symbol_binding (vec, sym); else return SCM_UNDEFINED; |