mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

Remove class-of opcode

Browse source 
* libguile/vm-engine.c (class-of): Remove unused opcode.
This commit is contained in:
Andy Wingo 2018-04-10 18:35:23 +02:00
parent 954bfad262
commit 3073199264
1 changed files with 1 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

8
libguile/vm-engine.c
View file

@ -2191,18 +2191,12 @@ VM_NAME (scm_i_thread *thread, struct scm_vm *vp,
VM_DEFINE_OP (110, unused_110, NULL, NOP)
VM_DEFINE_OP (111, unused_111, NULL, NOP)
VM_DEFINE_OP (112, unused_112, NULL, NOP)
VM_DEFINE_OP (113, unused_113, NULL, NOP)
{
vm_error_bad_instruction (op);
abort (); /* never reached */
}
VM_DEFINE_OP (113, unused_113, NULL, NOP)
{
ARGS1 (obj);
/* FIXME: restore fast path for direct instances. */
RETURN_EXP (scm_class_of (obj));
}
/*