HCoop
/
bpt
/
guile.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' into boehm-demers-weiser-gc
[bpt/guile.git]
/
libguile
/
hooks.c
diff --git
a/libguile/hooks.c
b/libguile/hooks.c
index
78adec0
..
7873829
100644
(file)
--- a/
libguile/hooks.c
+++ b/
libguile/hooks.c
@@
-50,7
+50,7
@@
scm_c_hook_init (scm_t_c_hook *hook, void *hook_data, scm_t_c_hook_type type)
void
scm_c_hook_add (scm_t_c_hook *hook,
scm_t_c_hook_function func,
void
scm_c_hook_add (scm_t_c_hook *hook,
scm_t_c_hook_function func,
- void *f
unc
_data,
+ void *f
n
_data,
int appendp)
{
scm_t_c_hook_entry *entry = scm_malloc (sizeof (scm_t_c_hook_entry));
int appendp)
{
scm_t_c_hook_entry *entry = scm_malloc (sizeof (scm_t_c_hook_entry));
@@
-60,19
+60,19
@@
scm_c_hook_add (scm_t_c_hook *hook,
loc = &(*loc)->next;
entry->next = *loc;
entry->func = func;
loc = &(*loc)->next;
entry->next = *loc;
entry->func = func;
- entry->data = f
unc
_data;
+ entry->data = f
n
_data;
*loc = entry;
}
void
scm_c_hook_remove (scm_t_c_hook *hook,
scm_t_c_hook_function func,
*loc = entry;
}
void
scm_c_hook_remove (scm_t_c_hook *hook,
scm_t_c_hook_function func,
- void *f
unc
_data)
+ void *f
n
_data)
{
scm_t_c_hook_entry **loc = &hook->first;
while (*loc)
{
{
scm_t_c_hook_entry **loc = &hook->first;
while (*loc)
{
- if ((*loc)->func == func && (*loc)->data == f
unc
_data)
+ if ((*loc)->func == func && (*loc)->data == f
n
_data)
{
scm_t_c_hook_entry *entry = *loc;
*loc = (*loc)->next;
{
scm_t_c_hook_entry *entry = *loc;
*loc = (*loc)->next;