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

* feature.c, feature.h (scm_make_hook, scm_add_hook_x,

Browse source 
scm_remove_hook_x, scm_run_hooks): Moved from ice-9/boot-9.scm.
(scm_make_named_hook): New function.
* feature.c: Added #include "eval.h".
This commit is contained in:
Mikael Djurfeldt 1998-11-23 02:34:49 +00:00
parent 7e41462735
commit 1330700c7d
2 changed files with 83 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

14
libguile/feature.h
View file

@ -46,10 +46,14 @@
#include "libguile/__scm.h"
extern void scm_add_feature SCM_P((char* str));
extern SCM scm_program_arguments SCM_P((void));
extern void scm_set_program_arguments SCM_P ((int argc, char **argv,
char *first));
extern void scm_init_feature SCM_P((void));
extern void scm_add_feature (char* str);
extern SCM scm_program_arguments (void);
extern void scm_set_program_arguments (int argc, char **argv, char *first);
extern SCM scm_make_hook (void);
extern SCM scm_make_named_hook (char* name);
extern SCM scm_add_hook_x (SCM hook, SCM thunk, SCM appendp);
extern SCM scm_remove_hook_x (SCM hook, SCM thunk);
extern SCM scm_run_hooks (SCM hooks);
extern void scm_init_feature (void);
#endif /* FEATUREH */