summaryrefslogtreecommitdiff
path: root/libguile/jit.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2019-04-25 18:24:20 +0200
committerAndy Wingo <wingo@pobox.com>2019-04-25 18:24:20 +0200
commite9a372b0201de0d0f1d6fdcb644acbbf87df2b90 (patch)
treea8f66d3a54ee88926a68bd75f3313309da663fa1 /libguile/jit.c
parentf0be544463f7afd151f4cdff2a1fc3d0a4137061 (diff)
downloadguile-e9a372b0201de0d0f1d6fdcb644acbbf87df2b90.tar.gz
Re-enable fixnum less-than JIT fast-path
* libguile/jit.c (compile_less): Re-enable fast-path for fixnums, now that the JIT library works :)
Diffstat (limited to 'libguile/jit.c')
-rw-r--r--libguile/jit.c8
1 files changed, 0 insertions, 8 deletions
diff --git a/libguile/jit.c b/libguile/jit.c
index 86d33a238..d1aa4fc99 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -3325,9 +3325,7 @@ compile_numerically_equal (scm_jit_state *j, uint16_t a, uint16_t b)
static void
compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
{
-#if 0
jit_reloc_t fast, k2, k3;
-#endif
jit_reloc_t k1;
uint32_t *target;
enum scm_opcode op = fuse_conditional_branch (j, &target);
@@ -3336,10 +3334,8 @@ compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
emit_sp_ref_scm (j, T0, a);
emit_sp_ref_scm (j, T1, b);
-#if 0
emit_andr (j, T2, T0, T1);
fast = jit_bmsi (j->jit, T2, scm_tc2_int);
-#endif
emit_call_2 (j, scm_vm_intrinsics.less_p,
jit_operand_gpr (JIT_OPERAND_ABI_POINTER, T0),
@@ -3363,7 +3359,6 @@ compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
default:
UNREACHABLE ();
}
-#if 0
k2 = jit_jmp (j->jit);
jit_patch_here (j->jit, fast);
@@ -3382,12 +3377,9 @@ compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
}
jit_patch_here (j->jit, k2);
-#endif
add_inter_instruction_patch (j, k1, target);
-#if 0
add_inter_instruction_patch (j, k3, target);
-#endif
}
static void