mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-19 02:00:26 +02:00
Code Activity

* Manual updates on hooks and features.

Browse source 
* Fix scm_t_c_hookype_t corruption.
This commit is contained in:
Neil Jerram 2002-03-16 00:27:25 +00:00
parent b193d130d8
commit 387d418c55
8 changed files with 429 additions and 37 deletions
Download patch file Download diff file Expand all files Collapse all files

8
libguile/hooks.h
View file

@ -57,11 +57,11 @@
* both may want to indicate success/failure and return a result.
*/
typedef enum scm_t_c_hookype_t {
typedef enum scm_t_c_hook_type {
SCM_C_HOOK_NORMAL,
SCM_C_HOOK_OR,
SCM_C_HOOK_AND
} scm_t_c_hookype_t;
} scm_t_c_hook_type;
typedef void *(*scm_t_c_hook_function) (void *hook_data,
void *func_data,
@ -75,13 +75,13 @@ typedef struct scm_t_c_hook_entry {
typedef struct scm_t_c_hook {
scm_t_c_hook_entry *first;
scm_t_c_hookype_t type;
scm_t_c_hook_type type;
void *data;
} scm_t_c_hook;
SCM_API void scm_c_hook_init (scm_t_c_hook *hook,
void *hook_data,
scm_t_c_hookype_t type);
scm_t_c_hook_type type);
SCM_API void scm_c_hook_add (scm_t_c_hook *hook,
scm_t_c_hook_function func,
void *func_data,