diff options
author | Andy Wingo <wingo@pobox.com> | 2018-06-24 08:59:42 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2018-06-24 08:59:42 +0200 |
commit | 2480761bde7d55ef05cc11eb49902ede84c70a0a (patch) | |
tree | dfd5fb3ba9411d2c250fcc7d15874e119bdf3f0e /libguile/control.c | |
parent | aad5bfed6017deb5725cf779f8a103bcc7658e94 (diff) | |
download | guile-2480761bde7d55ef05cc11eb49902ede84c70a0a.tar.gz |
Inline struct scm_vm into struct scm_i_thread
* libguile/threads.h (scm_i_thread): Inline struct scm_vm into struct
scm_i_thread, as these exist in a one-to-one relationship.
* libguile/threads.c (guilify_self_1, thread_mark, on_thread_exit):
* libguile/control.c (scm_suspendable_continuation_p):
* libguile/vm.c (init_vm, thread_vm): Adapt users.
Diffstat (limited to 'libguile/control.c')
-rw-r--r-- | libguile/control.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/control.c b/libguile/control.c index bd12fb6ca..e472b4839 100644 --- a/libguile/control.c +++ b/libguile/control.c @@ -223,7 +223,7 @@ scm_suspendable_continuation_p (SCM tag) if (scm_dynstack_find_prompt (&thread->dynstack, tag, &flags, NULL, NULL, NULL, ®isters)) - return scm_from_bool (registers == thread->vp->resumable_prompt_cookie); + return scm_from_bool (registers == thread->vm.resumable_prompt_cookie); return SCM_BOOL_F; } |