summaryrefslogtreecommitdiff
path: root/libguile/control.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2015-10-18 20:25:43 +0200
committerAndy Wingo <wingo@pobox.com>2015-10-21 11:49:20 +0200
commit8f027385db228d68193ad7316cf0b79489ac038b (patch)
tree9611f78024bf6d0e23f7ea91f04f8883b5be8f9a /libguile/control.c
parent30c06bfbb3db6e8c05f2ee6e7866d4ecf5838482 (diff)
downloadguile-8f027385db228d68193ad7316cf0b79489ac038b.tar.gz
Rename union scm_vm_stack_element members
* libguile/frames.h (union scm_vm_stack_element): Rename members from scm, ip, etc to as_scm, as_ip, etc. Adapt users.
Diffstat (limited to 'libguile/control.c')
-rw-r--r--libguile/control.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/control.c b/libguile/control.c
index a3457342b..c0bc62ddb 100644
--- a/libguile/control.c
+++ b/libguile/control.c
@@ -52,7 +52,7 @@ scm_i_prompt_pop_abort_args_x (struct scm_vm *vp,
n = stack_depth - saved_stack_depth;
for (i = 0; i < n; i++)
- vals = scm_cons (vp->sp[i].scm, vals);
+ vals = scm_cons (vp->sp[i].as_scm, vals);
vp->sp += n;
@@ -169,9 +169,9 @@ scm_c_abort (struct scm_vm *vp, SCM tag, size_t n, SCM *argv,
abort ();
/* Push vals */
- vp->sp[n].scm = cont;
+ vp->sp[n].as_scm = cont;
for (i = 0; i < n; i++)
- vp->sp[n - i - 1].scm = argv[i];
+ vp->sp[n - i - 1].as_scm = argv[i];
/* Jump! */
SCM_I_LONGJMP (*registers, 1);