mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 01:30:27 +02:00
Code Activity

Consolidate apply hook to instrument-entry instruction

Browse source 
* libguile/vm.c (scm_call_n):
* libguile/vm-engine.c: Move apply hook to "instrument-entry"
  instruction.
This commit is contained in:
Andy Wingo 2018-08-06 15:07:26 +02:00
parent 8f25f75bf1
commit dedf73d370
2 changed files with 3 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/vm.c
View file

@ -1435,9 +1435,6 @@ scm_call_n (SCM proc, SCM *argv, size_t nargs)
else
/* FIXME: Make this return an IP. */
apply_non_program (thread);
if (vp->trace_level)
vm_dispatch_apply_hook (thread);
}
thread->vm.registers = &registers;