diff options
author | Andy Wingo <wingo@pobox.com> | 2018-06-27 18:42:21 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2018-06-27 18:42:21 +0200 |
commit | 64d114817ac080029641792db3e199f614ad5e6d (patch) | |
tree | d90e9c7ff1f0e4652b28bd328d7ff66610ff3fe4 /libguile/continuations.h | |
parent | 154a5de3d733ae88264f3767dd71bb4c0b73b980 (diff) | |
download | guile-64d114817ac080029641792db3e199f614ad5e6d.tar.gz |
Intrinsics take registers from thread
* libguile/continuations.c (scm_i_make_continuation): Remove registers
argument; instead get from thread.
* libguile/vm-engine.c (vm_engine): Adapt VM engine to not receive a
registers argument, and thus to not pass it to intrinsics either.
* libguile/intrinsics.h:
* libguile/intrinsics.c (push_prompt):
* libguile/vm.c (capture_continuation, compose_continuation)
(abort_to_prompt): Refactor these intrinsics to not take a registers
argument; it's not necessary.
(scm_call_n): Don't pass registers argument.
Diffstat (limited to 'libguile/continuations.h')
-rw-r--r-- | libguile/continuations.h | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/libguile/continuations.h b/libguile/continuations.h index 94a791db1..8893eef07 100644 --- a/libguile/continuations.h +++ b/libguile/continuations.h @@ -67,9 +67,7 @@ typedef struct -SCM_INTERNAL SCM scm_i_make_continuation (jmp_buf *registers, - scm_thread *thread, - SCM vm_cont); +SCM_INTERNAL SCM scm_i_make_continuation (scm_thread *thread, SCM vm_cont); SCM_INTERNAL void scm_i_reinstate_continuation (SCM cont) SCM_NORETURN; SCM_INTERNAL int scm_i_continuation_to_frame (SCM cont, |