wingo pushed a commit to branch master
in repository guile.
commit d729a0dc757943c2bafb0cb300fc1ae7b3f56e91
Author: Andy Wingo <[email protected]>
Date: Thu Nov 12 21:23:09 2015 +0100
Remove br-if-equal opcode
* libguile/vm-engine.c (br-if-equal): Remove opcode.
---
libguile/vm-engine.c | 15 ++-------------
1 files changed, 2 insertions(+), 13 deletions(-)
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index d33878d..486585d 100644
--- a/libguile/vm-engine.c
+++ b/libguile/vm-engine.c
@@ -1464,20 +1464,9 @@ VM_NAME (scm_i_thread *thread, struct scm_vm *vp,
&& scm_is_true (scm_eqv_p (x, y))));
}
- // FIXME: remove, have compiler inline eqv test instead
- /* br-if-equal a:12 b:12 invert:1 _:7 offset:24
- *
- * If the value in A is equal? to the value in B, add OFFSET, a signed
- * 24-bit number, to the current instruction pointer.
- */
- // FIXME: Should sync_ip before calling out and cache_sp before coming
- // back! Another reason to remove this opcode!
- VM_DEFINE_OP (43, br_if_equal, "br-if-equal", OP3 (X8_S24, X8_S24,
B1_X7_L24))
+ VM_DEFINE_OP (43, unused_43, NULL, NOP)
{
- BR_BINARY (x, y,
- scm_is_eq (x, y)
- || (SCM_NIMP (x) && SCM_NIMP (y)
- && scm_is_true (scm_equal_p (x, y))));
+ abort ();
}
/* br-if-logtest a:24 _:8 b:24 invert:1 _:7 offset:24