summaryrefslogtreecommitdiff
path: root/libguile/foreign.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/foreign.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/foreign.c')
-rw-r--r--libguile/foreign.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/foreign.c b/libguile/foreign.c
index 3ac06591d..864019e63 100644
--- a/libguile/foreign.c
+++ b/libguile/foreign.c
@@ -1016,7 +1016,7 @@ scm_i_foreign_call (SCM foreign, const union scm_vm_stack_element *argv)
args[i] = (void *) ROUND_UP ((scm_t_uintptr) data + off,
cif->arg_types[i]->alignment);
assert ((scm_t_uintptr) args[i] % cif->arg_types[i]->alignment == 0);
- unpack (cif->arg_types[i], args[i], argv[cif->nargs - i - 1].scm, 0);
+ unpack (cif->arg_types[i], args[i], argv[cif->nargs - i - 1].as_scm, 0);
}
/* Prepare space for the return value. On some platforms, such as