diff options
author | Jim Blandy <jimb@red-bean.com> | 1996-11-21 16:28:39 +0000 |
---|---|---|
committer | Jim Blandy <jimb@red-bean.com> | 1996-11-21 16:28:39 +0000 |
commit | dc19d1d29a4701faadad98d5a84010f3ec847b07 (patch) | |
tree | 5ed8b12b9930da76c878adb13dd84229c7903efa /libguile/root.c | |
parent | a31bc6fbbae20f6ddd849a62a05845c0689bf44d (diff) | |
download | guile-dc19d1d29a4701faadad98d5a84010f3ec847b07.tar.gz |
It's an "eval closure", not an "eval thunk." A thunk is a
function of no arguments.
* root.h (struct scm_root_state): Renamed
top_level_lookup_closure_var from top_level_lookup_thunk_var.
(scm_top_level_lookup_closure_var): Renamed from
scm_top_level_lookup_thunk_var.
* root.c (mark_root): Uses changed.
* gdbint.c (gdb_eval, gdb_binding): Uses changed.
* init.c (scm_start_stack): Uses changed.
* eval.c (scm_eval, scm_eval_x, scm_init_eval): Rename uses.
Change scheme-visible name to *top-level-lookup-closure* from
*top-level-lookup-thunk*.
Diffstat (limited to 'libguile/root.c')
-rw-r--r-- | libguile/root.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/root.c b/libguile/root.c index 23c32654b..81310f684 100644 --- a/libguile/root.c +++ b/libguile/root.c @@ -83,7 +83,7 @@ mark_root (root) scm_gc_mark (s->def_inp); scm_gc_mark (s->def_outp); scm_gc_mark (s->def_errp); - scm_gc_mark (s->top_level_lookup_thunk_var); + scm_gc_mark (s->top_level_lookup_closure_var); scm_gc_mark (s->system_transformer); return SCM_ROOT_STATE (root) -> parent; } |