summaryrefslogtreecommitdiff
path: root/libguile/intrinsics.h
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2018-09-14 09:28:36 +0200
committerAndy Wingo <wingo@pobox.com>2018-09-14 09:34:31 +0200
commit0ccd2d0d9ed6b4e233b0cad99d66d57e99ea99c6 (patch)
treeddd8384ce6b3ffcc510e490ffc1dff4c910b3ee7 /libguile/intrinsics.h
parentbf31fe4cf6d75c96cc4ef29fea8808dd539da361 (diff)
downloadguile-0ccd2d0d9ed6b4e233b0cad99d66d57e99ea99c6.tar.gz
Remove hook intrinsics: hooks are just for the VM
* libguile/intrinsics.h (SCM_FOR_ALL_VM_INTRINSICS): Remove VM hook intrinsics, now that we're going to rely on the interpreter for stepping and breakpoints. * libguile/jit.c (struct scm_jit_state): Remove "hooks_enabled" member, now that we won't JIT. Remove all code related to calling hooks. * libguile/vm-engine.c (RUN_HOOK): Call hooks directly instead of through intrinsics. Use precise per-hook enable flags. * libguile/vm.c (DEFINE_INVOKE_HOOK): New helper. Use to define the hook invokers.
Diffstat (limited to 'libguile/intrinsics.h')
-rw-r--r--libguile/intrinsics.h4
1 files changed, 0 insertions, 4 deletions
diff --git a/libguile/intrinsics.h b/libguile/intrinsics.h
index 30e85c5fc..397dffed6 100644
--- a/libguile/intrinsics.h
+++ b/libguile/intrinsics.h
@@ -160,10 +160,6 @@ typedef uint32_t* scm_t_vcode_intrinsic;
M(scm_from_thread, current_module, "current-module", CURRENT_MODULE) \
M(thread_u8_scm_sp_vra_mra, push_prompt, "push-prompt", PUSH_PROMPT) \
M(thread_scm, unpack_values_object, "unpack-values-object", UNPACK_VALUES_OBJECT) \
- M(thread, invoke_apply_hook, "invoke-apply-hook", INVOKE_APPLY_HOOK) \
- M(thread, invoke_return_hook, "invoke-return-hook", INVOKE_RETURN_HOOK) \
- M(thread, invoke_next_hook, "invoke-next-hook", INVOKE_NEXT_HOOK) \
- M(thread, invoke_abort_hook, "invoke-abort-hook", INVOKE_ABORT_HOOK) \
M(scm_from_ptr, atomic_ref_scm, "atomic-ref-scm", ATOMIC_REF_SCM) \
M(ptr_scm, atomic_set_scm, "atomic-set-scm", ATOMIC_SET_SCM) \
M(scm_from_ptr_scm, atomic_swap_scm, "atomic-swap-scm", ATOMIC_SWAP_SCM) \