summaryrefslogtreecommitdiff
path: root/libguile/init.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1998-02-02 15:00:14 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1998-02-02 15:00:14 +0000
commit39752bec0aea1cddb787ad577dae78645c146442 (patch)
tree10d5a0216a847af7cee2ec4a65c2ae918c934190 /libguile/init.c
parent660f41fa24a1196e355447a677f5a345f8dca2a9 (diff)
downloadguile-39752bec0aea1cddb787ad577dae78645c146442.tar.gz
* backtrace.c (display_error_body, display_backtrace_body),
coop-threads.c (scheme_body_bootstrip, c_body_bootstrip), gh_eval.c (eval_str_wrapper, eval_file_wrapper), init.c (invoke_main_func), root.c (cwdr_body), throw.c (cwss_body, scm_body_thunk, hbpca_body): Removed the second jmpbuf arg on body functions.
Diffstat (limited to 'libguile/init.c')
-rw-r--r--libguile/init.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/libguile/init.c b/libguile/init.c
index cb2bd8cb2..9762198ba 100644
--- a/libguile/init.c
+++ b/libguile/init.c
@@ -294,7 +294,7 @@ struct main_func_closure
static void scm_boot_guile_1 SCM_P ((SCM_STACKITEM *base,
struct main_func_closure *closure));
-static SCM invoke_main_func SCM_P ((void *body_data, SCM jmpbuf));
+static SCM invoke_main_func SCM_P ((void *body_data));
/* Fire up the Guile Scheme interpreter.
@@ -501,9 +501,8 @@ scm_boot_guile_1 (base, closure)
static SCM
-invoke_main_func (body_data, jmpbuf)
+invoke_main_func (body_data)
void *body_data;
- SCM jmpbuf;
{
struct main_func_closure *closure = (struct main_func_closure *) body_data;