summaryrefslogtreecommitdiff
path: root/libguile/hooks.h
diff options
context:
space:
mode:
authorMichael Livshin <mlivshin@bigfoot.com>2001-05-28 14:18:35 +0000
committerMichael Livshin <mlivshin@bigfoot.com>2001-05-28 14:18:35 +0000
commitfde504077bf4f73e3f9983de6ae8599d3fbb8895 (patch)
tree61f5da144f8c1ae4b7262afadc4c94792f41eaf8 /libguile/hooks.h
parentdd85ce4758260f712d0efc806df6643aca8e3b74 (diff)
downloadguile-fde504077bf4f73e3f9983de6ae8599d3fbb8895.tar.gz
* hooks.c (scm_create_hook): deprecated.
(make_hook): deleted. (scm_make_hook): all the hook creation code is now here. * gc.c (scm_init_gc): don't call `scm_create_hook'. instead make a hook, make it permanent, and do a `scm_c_define' on it.
Diffstat (limited to 'libguile/hooks.h')
-rw-r--r--libguile/hooks.h5
1 files changed, 4 insertions, 1 deletions
diff --git a/libguile/hooks.h b/libguile/hooks.h
index 216d63062..ff9d9d5d4 100644
--- a/libguile/hooks.h
+++ b/libguile/hooks.h
@@ -104,7 +104,6 @@ extern scm_bits_t scm_tc16_hook;
#define SCM_SET_HOOK_PROCEDURES(hook, procs) SCM_SET_CELL_OBJECT_1 ((hook), (procs))
extern SCM scm_make_hook (SCM n_args);
-extern SCM scm_create_hook (const char* name, int n_args);
extern SCM scm_hook_p (SCM x);
extern SCM scm_hook_empty_p (SCM hook);
extern SCM scm_add_hook_x (SCM hook, SCM thunk, SCM appendp);
@@ -115,6 +114,10 @@ extern void scm_c_run_hook (SCM hook, SCM args);
extern SCM scm_hook_to_list (SCM hook);
extern void scm_init_hooks (void);
+#if (SCM_DEBUG_DEPRECATED == 0)
+extern SCM scm_create_hook (const char* name, int n_args);
+#endif
+
#endif /* SCM_HOOKS_H */
/*