diff options
author | Andy Wingo <wingo@pobox.com> | 2015-10-18 20:25:43 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2015-10-21 11:49:20 +0200 |
commit | 8f027385db228d68193ad7316cf0b79489ac038b (patch) | |
tree | 9611f78024bf6d0e23f7ea91f04f8883b5be8f9a /libguile/control.c | |
parent | 30c06bfbb3db6e8c05f2ee6e7866d4ecf5838482 (diff) | |
download | guile-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.c | 6 |
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); |