summaryrefslogtreecommitdiff
path: root/libguile/hooks.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/hooks.c')
-rw-r--r--libguile/hooks.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/hooks.c b/libguile/hooks.c
index 1c316ef69..0e7749e7e 100644
--- a/libguile/hooks.c
+++ b/libguile/hooks.c
@@ -183,7 +183,7 @@ SCM_DEFINE (scm_hook_empty_p, "hook-empty?", 1, 0, 0,
#define FUNC_NAME s_scm_hook_empty_p
{
SCM_VALIDATE_HOOK (1, hook);
- return scm_from_bool (SCM_NULLP (SCM_HOOK_PROCEDURES (hook)));
+ return scm_from_bool (scm_is_null (SCM_HOOK_PROCEDURES (hook)));
}
#undef FUNC_NAME