diff options
| author | Jim Blandy <jimb@red-bean.com> | 1996-08-15 07:22:05 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@red-bean.com> | 1996-08-15 07:22:05 +0000 |
| commit | acc909e634ac3b8bac2afad3fd8688c6b999e369 (patch) | |
| tree | 2c4403cf98f3dab2f5b7cfa1ec61c0a72dbfe384 /libguile/init.h | |
| parent | 47b44240b9e67361f2327c78ae39f55fa79d8469 (diff) | |
| download | guile-acc909e634ac3b8bac2afad3fd8688c6b999e369.tar.gz | |
* init.c (scm_boot_guile): Add init_func argument; call
(*init_func) instead of calling scm_appinit; it's ucky to
hard-code names for the user's procedures.
* init.h (scm_boot_guile): Adjust declaration.
* init.h (scm_start_stack, scm_restart_stack): Use PROTO;
eliminate all the __STDC__ conditionals.
(scm_boot_guile): Add declaration.
* init.c (scm_start_stack, scm_restart_stack, scm_boot_guile):
Remove __STDC__ conditionals around function definitions; the
declarations in init.h will provide the same information, more
usefully.
Diffstat (limited to 'libguile/init.h')
| -rw-r--r-- | libguile/init.h | 21 |
1 files changed, 8 insertions, 13 deletions
diff --git a/libguile/init.h b/libguile/init.h index a20262104..4917167dc 100644 --- a/libguile/init.h +++ b/libguile/init.h @@ -58,18 +58,13 @@ enum scm_boot_status -#ifdef __STDC__ -extern void scm_start_stack (void * base, FILE * in, FILE * out, FILE * err); -extern void scm_restart_stack (void * base); - -#else /* STDC */ -extern void scm_start_stack (); -extern void scm_restart_stack (); - -#endif /* STDC */ - - - - +extern void scm_start_stack PROTO ((void *base, + FILE *in, FILE *out, FILE *err)); +extern void scm_restart_stack PROTO ((void * base)); +extern int scm_boot_guile PROTO ((char **result, + int argc, char **argv, + FILE *in, FILE *out, FILE *err, + void (*init_func) (), + char *boot_cmd)); #endif /* INITH */ |