1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-04 19:20:27 +02:00
guile/module/system
Andy Wingo f312025167 add vm-abort-continuation-hook, vm-restore-continuation-hook
* libguile/vm-i-system.c (call_cc, tail_call_cc): Call the new
  RESTORE_CONTINUATION_HOOK when a continuation is restored.
  (prompt): Call the new ABORT_CONTINUATION_HOOK when entering the abort
  handler's continuation.

* libguile/vm-engine.h (ABORT_CONTINUATION_HOOK)
  (RESTORE_CONTINUATION_HOOK):
* libguile/vm.h (SCM_VM_ABORT_CONTINUATION_HOOK)
  (SCM_VM_RESTORE_CONTINUATION_HOOK):
* libguile/vm.c: (scm_vm_abort_continuation_hook): New hook, called when
  entering an abort handler.
  (scm_vm_restore_continuation_hook): New hook, called after returning
  to a continuation.

* module/system/vm/vm.scm: Add hooks to export list.
2010-09-16 12:48:41 +02:00
..
base Check for go/scm mtime ordering rather than equality. 2010-07-26 19:38:52 +02:00
repl Fix typos. 2010-09-02 00:04:39 +02:00
vm add vm-abort-continuation-hook, vm-restore-continuation-hook 2010-09-16 12:48:41 +02:00
foreign.scm Rename make-foreign-function' to pointer->procedure'. 2010-09-06 22:24:44 +02:00
xref.scm new procedure: source-procedures 2010-09-10 13:29:56 +02:00