summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/eval.c3
-rw-r--r--libguile/private-options.h4
2 files changed, 1 insertions, 6 deletions
diff --git a/libguile/eval.c b/libguile/eval.c
index 151e9ba99..8f2f5d02f 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -2931,8 +2931,6 @@ int scm_check_apply_p;
int scm_check_exit_p;
int scm_check_memoize_p;
-long scm_eval_stack;
-
scm_t_option scm_eval_opts[] = {
{ SCM_OPTION_INTEGER, "stack", 22000, "Size of thread stacks (in machine words)." },
{ 0 }
@@ -3011,7 +3009,6 @@ SCM_DEFINE (scm_eval_options_interface, "eval-options-interface", 0, 1, 0,
ans = scm_options (setting,
scm_eval_opts,
FUNC_NAME);
- scm_eval_stack = SCM_EVAL_STACK * sizeof (void *);
scm_dynwind_end ();
return ans;
diff --git a/libguile/private-options.h b/libguile/private-options.h
index ffb699bee..703ca8a5b 100644
--- a/libguile/private-options.h
+++ b/libguile/private-options.h
@@ -4,7 +4,7 @@
* We put this in a private header, since layout of data structures
* is an implementation detail that we want to hide.
*
- * Copyright (C) 2007 Free Software Foundation, Inc.
+ * Copyright (C) 2007, 2009 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
@@ -30,8 +30,6 @@
*/
SCM_API scm_t_option scm_eval_opts[];
-SCM_API long scm_eval_stack;
-
SCM_API scm_t_option scm_evaluator_trap_table[];
SCM_API SCM scm_eval_options_interface (SCM setting);